Viết chương trình in ra màn hình sử dụng câu lệnh for do tinh s=3+6+9+12+…+99 25/07/2021 Bởi Eloise Viết chương trình in ra màn hình sử dụng câu lệnh for do tinh s=3+6+9+12+…+99
program tinhtong; uses crt; var t,i:integer; begin clrscr; t:=0; for i:=3 to 99 do if i mod 3=0 then t:=t+i; write(‘Tong la: ‘,t); readln end. Bình luận
@ kynguyen64 Bài làm của mik nè ^_^ program tinh_s; uses crt; var t,i:integer; begin clrscr; t:=0; for i:=3 to 99 do if i mod 3=0 then t:=t+i; write(‘Tong la: ‘); write(t); readln; end. # nocopy # ara boss ris CHÚC BẠN HỌC TỐT ! NHỚ ĐỂ LẠI CHO KYNGUYEN64 CTLHN+5 SAO+CÁM ƠN NHA ! Bình luận
program tinhtong;
uses crt;
var t,i:integer;
begin
clrscr;
t:=0;
for i:=3 to 99 do
if i mod 3=0 then t:=t+i;
write(‘Tong la: ‘,t);
readln
end.
@ kynguyen64
Bài làm của mik nè ^_^
program tinh_s;
uses crt;
var t,i:integer;
begin
clrscr;
t:=0;
for i:=3 to 99 do
if i mod 3=0 then t:=t+i;
write(‘Tong la: ‘); write(t);
readln;
end.
# nocopy
# ara boss ris
CHÚC BẠN HỌC TỐT !
NHỚ ĐỂ LẠI CHO KYNGUYEN64 CTLHN+5 SAO+CÁM ƠN NHA !