Напечатайте числа в виде таблицы 333

Question

Напечатайте числа в виде таблицы 333

---

Comments

Что такое 333? Вы привели целый лист текста, что именно сделать надо?

---

Сейчас будет.

---

подождите

---

я новый задам вопрос с фото

---

тут уже нельзя изменить

---

ок, ждём

---

все

Answer 1

Program p1;
var i:integer;
begin
for i:=1 to 9 do
begin
write(3);
if (i mod 3)=0 then writeln;
end;
end.