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

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

Question

Смарагд

8 октября, 18:05

+1

Ответы (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, удобнее решать эту задачу.