Cho mình xin chương trình máy tính sử dụng lệnh for do
2 câu trả lời
program ct;
uses crt;
var s,i,n:integer;
begin
clrscr;
write('nhap n:=');readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln('tong la:',s);
readln
end.
chúc bạn học tốt
cho mình câu trả lời hay nhất nha
Câu hỏi trong lớp
Xem thêm