em hãy sử dụng vòng lặp While…do để viết chương trình tính tổng các số từ 15 đến 75?
Giúp mk vs nha
em hãy sử dụng vòng lặp While…do để viết chương trình tính tổng các số từ 15 đến 75? Giúp mk vs nha
By Alexandra
By Alexandra
em hãy sử dụng vòng lặp While…do để viết chương trình tính tổng các số từ 15 đến 75?
Giúp mk vs nha
uses crt;
var i,t:integer;
begin
clrscr;
i:=15;t:=0;
while i<76 do
begin
t:=t+i;
i:=i+1
end;
writeln(‘Tong cac so tu 15 den 75 la: ‘,t);
readln;
end.
uses crt;
var i,s:integer;
begin
clrscr;
i:=15; s:=0;
while i<=75 do
begin
s:=s+i;
i:=i+1;
end;
write(‘Tong la: ‘,s);
readln
end.