Viết chương trình pascal tính tổng các số tự nhiên trong phạm vi từ 5-45(dùng lệnh lặp while-.do)thông báo kết quả ra màn hình Giúp mình với nhé

0 bình luận về “Viết chương trình pascal tính tổng các số tự nhiên trong phạm vi từ 5-45(dùng lệnh lặp while-.do)thông báo kết quả ra màn hình Giúp mình với nhé”

1. var i,n,t:integer;

   begin

   i:=5;

   n:=45;

   while i<=n do

   begin

   t:=t+i;

   i:=i+1;

   end;

   writeln(t);

   readln;

   end.

   Bình luận