Question

Viết chương trình tính S=1+2_+100 của chương trình pascal

Answer 1

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 100 do s:=s+i;

writeln(s);

readln;

end.

Answer 2

#include <iostream>

using namespace std;

 

int main () {

     int tong = 0;

     for (int i = 1 ; i <= 100; i++) tong = tong + i;

     cout << " Tong S = " << tong;

     return 0;

}

Chạy chương trình

Tong S = 5050