
Loschyubl
6 год назад
Написать алгоритм для вычисления суммы нечетных чисел на отрезке от -30 до 45
ОТВЕТЫ

Vanasrara
Aug 3, 2019
Var
i, s: integer;
begin
for i := -30 to 45 do
if i mod 2 = 0 then s := s + i;
writeln(s= , s);
end.
i, s: integer;
begin
for i := -30 to 45 do
if i mod 2 = 0 then s := s + i;
writeln(s= , s);
end.
246
Смежные вопросы: