Bài 10: Cấu trúc lặp

HN

viet chuong trinh nhap vao so nguyen N. tinh va in ra man hinh tong cac so le trong pham vi N

 

NT
18 tháng 2 2022 lúc 15:40

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n do

  if i mod 2=1 then t:=t+i;

writeln(t);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
NT
Xem chi tiết
VA
Xem chi tiết
TH
Xem chi tiết
LD
Xem chi tiết
TH
Xem chi tiết
TU
Xem chi tiết
JV
Xem chi tiết
H24
Xem chi tiết
HL
Xem chi tiết