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
2 câu trả lời
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.
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.
Câu hỏi trong lớp
Xem thêm