1) Составить программу (паскаль) вывода на экран всех нечетных двухзначных чисел. 2) составить программу вычисления суммы всех трехзначных чисел, кратных 5

Question

Информатика

Лавиния

25 июля, 01:05

1) Составить программу (паскаль) вывода на экран всех нечетных двухзначных чисел. 2) составить программу вычисления суммы всех трехзначных чисел, кратных 5

+3

Ответы (1)

Знаете ответ на вопрос?

Максимка · Answer 1

1)

var

i: integer;

begin

for i : = 10 to 99 do

if i mod 2 = 0 then

write (i, ' ') ;

end.

2)

var

i, s: integer;

begin

for i : = 100 to 999 do

if i mod 5 = 0 then

s : = s + i;

writeln (s) ;

end.