Bài 6. Câu lệnh điều kiện

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Phuong Pham

Viết chương trình tính tổng của số tự nhiên từ 10-50 sử dụng lệnh while do

Hồ Lê Phương Nam
4 tháng 5 2018 lúc 21:39

program Tong;

uses crt;

var i, n, S: integer;

begin

clrscr;

S:=0; i:=10;

while i<=50 do begin S:=S+i; i:=i+1 end;

writeln('Tong so cac so tu nhien tu 10 den 50 la', S);

readln

end.


Các câu hỏi tương tự
Tam Be
Xem chi tiết
vũ thành đông
Xem chi tiết
minh đạt
Xem chi tiết
nhật nguyên
Xem chi tiết
Nguyễn Đăng Trường
Xem chi tiết
Huy Tùng Vũ
Xem chi tiết
huu nguyen
Xem chi tiết
Snsbbdbd Xnxb
Xem chi tiết
Giuly Marinette Thư
Xem chi tiết