NH

Em hãy sử dụng câu lệnh lặp với số lần biết trước biết chương trình pascal để giải bài toán sau:S=1+2+3+...+10

PG
16 tháng 3 2023 lúc 8:41

program TinhTong;

var

     i, S: integer;

begin

     S := 0;

     for i := 1 to 10 do

          S := S + i;

     writeln('Tong cac so tu 1 den 10 la: ', S);

     readln;

end.

Bình luận (0)

Các câu hỏi tương tự
VK
Xem chi tiết
PH
Xem chi tiết
NH
Xem chi tiết
LN
Xem chi tiết
LN
Xem chi tiết
H24
Xem chi tiết
HN
Xem chi tiết
TC
Xem chi tiết
TA
Xem chi tiết