Напечатайте числа в виде таблицы 333
Program p1;
var i:integer;
begin
for i:=1 to 9 do
begin
write(3);
if (i mod 3)=0 then writeln;
end;
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Program p1;
var i:integer;
begin
for i:=1 to 9 do
begin
write(3);
if (i mod 3)=0 then writeln;
end;
end.