Найти сумму цифр в Паскале (используя while или repeat)S=101+103+... +301Составить программу.
Найти сумму цифр в Паскале (используя while или repeat)S=101+103+... +301Составить программу.
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program SumPascal;
var
i, sum: integer;
begin
sum := 0;
i := 101;
while i <= 301 do
begin
sum := sum + i;
i := i + 2;
end;
writeln('Сумма цифр в Паскале: ', sum);
end.