Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
var i,s: integer;

begin
s:=0;
i:=2;
while i<=20 do begin
 s:=s+i;
 i:=i+2;
 end;
println(s);
end.
641
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам