Sử dụng câu lệnh lặp While...do tính tổng i đến n?
(ĐÚng Nhất Mới Vote)
2 câu trả lời
uses crt;
var i, n, T : longint;
begin
clrscr;
write('nhap i va n : '); readln(i, n);
while i <= n do
begin
T := T + i; i := i + 1;
end;
writeln('Tong T = ', T);
readln
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
