Напечатайте числа в виде таблицы 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.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку