Составить программу вычисления суммы нечётных чисел от 1 до 20 (через while).



[email protected] в категроии Информатика, вопрос открыт 23.04.2017 в 13:44



[email protected] , ответ добавлен 23.04.2017 в 13:56

Var i,s: integer;

begin
s:=0;
i:=2;
while i<=20 do begin
s:=s+i;
i:=i+2;
end;
println(s);
end.

0

Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.

1 ответ