Question

программа в паскале для вывода 3-значных чисел делящихся на 3 и 5 без остатка

Answer 1

Ответ:

Var a:array[100..999] of longint; i:longint;

begin

For i:=1 to 999 do

If ((a[i] mod 3) = 0) and ((a[i] mod 5) = 0) then

writeln(a[i]) ;

End.

Попробуй. И поставь как лучший пж