2 câu trả lời
Program Hotboy;
Uses crt;
Var s,i,n: longint;
Begin
Clrscr;
S:=0;
For i:=1 to 5 do
S:=S+i;
I:=i+1;
Write('tong la',S);
Readln
End.
uses crt;
var s,i,n: longint;
begin
clrscr;
s:=0;
for i:=1 to 5 do
begin
s:=s+i;
i:=i+1;
end;
write('Tong la: ',s);
readln
end.
Câu hỏi trong lớp
Xem thêm