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

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hoài Em

nhập số nguyên dương N tính :

S=1+2+3+...+N nếu N lẻ

S=(N+1)/2 nếu N chẵn
viết chương trình với cấu trúc For...do

giúp mình với ạ . Thank you very much!!!

Minh Lệ
22 tháng 8 2019 lúc 9:36

Lời giải :

program hotrotinhoc;

var s: real;

i,n: integer;

begin

readln(n);

s:=0;

for i:=1 to n do

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

if n mod 2=0 then s:=(n+1)/2;

write(s:1:0);

readln

end.


Các câu hỏi tương tự
Lê Thị Thùy Dung
Xem chi tiết
Nhan Nhược Nhi
Xem chi tiết
언방용
Xem chi tiết
Hoàng Hugi
Xem chi tiết
Nguyễn Thiên Anh
Xem chi tiết
Hoàng Hugi
Xem chi tiết
Jack Viet
Xem chi tiết
tu uyen
Xem chi tiết
Nguyễn Cao Kỳ Uyên
Xem chi tiết