Предмет: Информатика,
автор: viktordidi
С помощью "пока" цикла найти сумму четных чисел от 2 до 100 pascal
Ответы
Автор ответа:
0
var
_sum, i : integer;
begin
_sum := 0;
i := 2;
while (i <= 100) do
begin
_sum := _sum + i;
i := i + 2;
end;
writeln(_sum);
end.
Похожие вопросы
Предмет: Русский язык,
автор: sesik
Предмет: Английский язык,
автор: 89286080787
Предмет: Русский язык,
автор: fdffadsf
Предмет: Математика,
автор: mashatvmashatv8
Предмет: Русский язык,
автор: Аноним