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

Question

Информатика

Артемон

16 июня, 15:07

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

+2

Ответы (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.