вывести на экран все двузначные числа кратные 6​(паскаль) ​


bazi15121994mai: var i, n : integer;

begin
n := 6;

for i := 10 to 99 do

begin

if (i mod n) = 0 then
begin
write(i, ' ');

end;

end;
end.

Ответы

Ответ дал: LilBiba
1

Ответ:

Program abc;

var a:integer;

begin

for a:=10 to 99 do

if a mod 6=0 then

write(a,' ');

end.

Вас заинтересует