Sử dụng vòng lập for-.. do câu lệnh điều kiện if- Then viết chương trình tính tổng các số lẻ từ 10 đến 100 23/07/2021 Bởi Hailey Sử dụng vòng lập for…… do câu lệnh điều kiện if…. Then viết chương trình tính tổng các số lẻ từ 10 đến 100
uses crt; var i,s: integer; begin clrscr; for i:=10 to 100 do if i mod 2<>0 then s:=s+i; writeln (‘tong la: ‘,s); readln; end. Bình luận
đây bạn
uses crt;
var i,s: integer;
begin
clrscr;
for i:=10 to 100 do
if i mod 2<>0 then s:=s+i;
writeln (‘tong la: ‘,s);
readln;
end.