Giúp em với mọi người ơi, em cần làm đúng và chính xác nha * Đề: Viết chương trình tính tổng 6 số tự nhiên đầu tiên

0 bình luận về “Giúp em với mọi người ơi, em cần làm đúng và chính xác nha * Đề: Viết chương trình tính tổng 6 số tự nhiên đầu tiên”

1. Program tinh_tong ;

   Uses crt ;

   Var S,i : integer ;

   Begin

   S:= 0 ;

   For i:= 1 to 6 do

   S:= S+ i ;

   Writeln (‘Tong 6 so tu nhien dau tien la: ‘,S);

   Readln

   End.

   Bình luận

2. uses crt;

   var i, s : integer;

   Begin clrscr;

   s:=0;

   for i :=1 to 6 do

   s:=s+i;

   writeln(‘Tong 6 so tu nhien dau tien la :’,s);

   readln

   end.

   Bình luận