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

HE

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!!!

ML
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.

Bình luận (3)

Các câu hỏi tương tự
LD
Xem chi tiết
NN
Xem chi tiết
H24
Xem chi tiết
HH
Xem chi tiết
NA
Xem chi tiết
HH
Xem chi tiết
JV
Xem chi tiết
TU
Xem chi tiết
NU
Xem chi tiết