Lập trình Scratch

Nguyễn Minh Hiếu

Cho số tự nhiên A(i<=A<=10^6).

Tính tổng sau: s:=1-2+3-4+5-6+...+A

Giúp mình với! Xin cảm ơn!!!!!

Nguyễn Lê Phước Thịnh
17 tháng 5 2020 lúc 20:56

uses crt;

var a,i,s:longint;

begin

clrscr;

write('a='); readln(a);

s:=0;

for i:=1 to a do

begin

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

else s:=s-i;

end;

writeln('Ket qua la: ',s);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Nguyễn Minh Hiếu
Xem chi tiết
Nguyễn Minh Hiếu
Xem chi tiết
Thu Pham Ngoc Anh
Xem chi tiết
NC Channel
Xem chi tiết
Nguyễn Xuân Phong
Xem chi tiết
Sans human
Xem chi tiết
Nguyễn Phùng Thanh Trúc
Xem chi tiết
nguyễn quốc huy
Xem chi tiết
Ngọc Châu
Xem chi tiết