Nhập input, output, tính tổng S = 1+2+3+...+N với N là số nguyên được nhập từ bàn phím.

2 câu trả lời

Input: số tự nhiên N:1,2,3.....N

Output:tổng s

var n,s: longint;

begin

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

for i:=1 to n do

s:=s+i;

write('s= ',s);

readln;

end.

Câu hỏi trong lớp Xem thêm