Trần Võ Anh Thy 8/2
Hỏi từ APP VIETJACK
Sử dụng lệnh lặp for...do,while...do để tính tổng số bất kì nhập từ bàn phím.
Quảng cáo
2 câu trả lời 278
3 năm trước
uses crt;
var n,i,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
i:=1;
while i<=n do
begin
s:=s+i;
inc(i);
end;
writeln('Tong cac so trong khoang tu 1 den ',n,' la: ',s);
readln;
end.
3 năm trước
uses crt;
var n,i,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
s:=0;
i:=1;
while i<=n do
begin
s:=s+i;
inc(i);
end;
writeln('Tong cac so trong khoang tu 1 den ',n,' la: ',s);
readln;
end.
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44779
-
Hỏi từ APP VIETJACK26406
Thành viên hăng hái nhất trong tuần
-
✧Bánh Gạo✧
265 điểm
-
Trịnh Kim Chi
205 điểm
-
Zin Phan 140 điểm
-
truc chu 120 điểm
-
Lê Thế Anh (Frebo)
110 điểm
-
quynh nhu lê
95 điểm
-
જ⁀➴亗ɲɦư♡
55 điểm
-
PHƯỢNG HOÀNG: 50 điểm
-
Nguyễn Ngọc An
30 điểm
-
Trinh Phương 30 điểm
-
hà anh
30 điểm
-
Biet Khong 25 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
3 năm trước7533
-
3 năm trước7166
-
3 năm trước6171
-
3 năm trước5927
-
3 năm trước5975
Gửi báo cáo thành công!
