Ответ:
Var i:integer;
Begin
for i := 100 to 999 do
if (i mod 15 = 11) and (i mod 11 = 9)
then writeln(i);
End.
Объяснение:
Vari:integer;beginfor i:=100 to 999 do beginif (i mod 15=11) and (i mod 11=9) thenwrite(i+' ');end;end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Var i:integer;
Begin
for i := 100 to 999 do
if (i mod 15 = 11) and (i mod 11 = 9)
then writeln(i);
End.
Объяснение:
Ответ:
Vari:integer;beginfor i:=100 to 999 do beginif (i mod 15=11) and (i mod 11=9) thenwrite(i+' ');end;end.