Quảng cáo
1 câu trả lời 1446
3 năm trước
program tinh_tong;
Var N,i: integer;
S: Longint;
begin
Write('Nhap so N=');readln(n); s:=0;
For i:=1 to n do
S:= s+i;
writeln(Tong cua ',N,' so tu nhien dau tien la s=',s);
End.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44971
-
Hỏi từ APP VIETJACK27113
Gửi báo cáo thành công!
