Работа в паскале составьте программу вычисления суммы всех трехзначных чисел кратных 4

алина3860 алина3860    1   28.08.2019 23:00    1

Ответы
Turtlrs Turtlrs  06.10.2020 01:30
Uses crt;
var 
n, sum:integer;
begin
n := 100;
while n < 1000 do   
begin     
sum += n;     
n += 4;   
end;   
writeln('Сумма всех трёхзначных чисел, кратных 4= ',sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика