Ответы
Ответ дал:
1
Ответ:
Program abc;
var a:integer;
begin
for a:=10 to 99 do
if a mod 6=0 then
write(a,' ');
end.
Вас заинтересует
1 год назад
9 лет назад
begin
n := 6;
for i := 10 to 99 do
begin
if (i mod n) = 0 then
begin
write(i, ' ');
end;
end;
end.