Дано натуральное четное число N. Получите S=2+4+6 + ... + N

Подумайте, с помощью какого цикла - с условием или for, удобнее решать эту задачу.

Question

Пантелей

2 октября, 13:28

+5

Ответы (1)

Знаете ответ на вопрос?

Анда · Answer 1

Program chisl; var s, n, a, m:integer;

begin

a:=2;

read (n) ;

while a<=n do

begin

s:=s+a;

a:=a+2;

end;

write (s) ;

end.

Дано натуральное четное число N. Получите S=2+4+6 + ... + NПодумайте, с помощью какого цикла - с условием или for, удобнее решать эту задачу.