Thúy Hoa

Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện để tính tổng các giá trị lag số lẻ trong phạm vi từ 1 đến N, sau đó in ra màn hình

Bùi Anh Tuấn
30 tháng 3 2021 lúc 20:01

Bình luận (0)
Nguyễn Lê Phước Thịnh
30 tháng 3 2021 lúc 20:31

uses crt;

var i,n,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

for i:=1 to n do 

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

writeln(s);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Nguyễn Cảnh Hùng
Xem chi tiết
Nguyễn Ngọc Diễm My
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
Nguyễn Cảnh Hùng
Xem chi tiết
huu nguyen
Xem chi tiết
Tiến Đạt Huỳnh
Xem chi tiết
Võ Tấn Trường Phạm
Xem chi tiết
MANH AN
Xem chi tiết