Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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