Question

по паскалю пж Надрукуйте всі цілі числа з інтервалу [1; 50], що кратні 5 або 7.

Answer 1

for i:= 1 to 50 do
if (a[i] mod 5 =0) or (a[i] mod 7 =0) then writeln(a[i]);

Answer 2

слушай,а сможешь еще с одной задачкой помочь?Пж

Answer 3

да

Answer 4

Надрукуйте в рядок всі трьохзначні числа, сума цифр яких кратна 20.