Печатать 0 (ноль) указанное количество раз. Для решения задачи использовать цикл Repeat или While.
Cрочно пожалуйстааааа!!!!!!!!!!!!!!!!!!!!!

Вот решение задачи на Pascal. Нужно ввести число n, а затем напечатать 0 ровно n раз. Для этого можно использовать цикл while или repeat.

Вариант с циклом while

pascal
var
  n, i: integer;

begin
  readln(n);
  i := 1;

  while i <= n do
  begin
    write(0);
    i := i + 1;
  end;
end.

Как работает программа

Пользователь вводит число n. Например:

pascal
5

Это значит, что ноль нужно вывести 5 раз.

Переменная i считает, сколько раз уже напечатали 0.

Сначала:

pascal
i := 1;

Пока i <= n, программа печатает ноль:

pascal
write(0);

Потом увеличивает i на 1:

pascal
i := i + 1;

Если ввести 5, программа выведет:

pascal
00000

Вариант с циклом repeat

pascal
var
  n, i: integer;

begin
  readln(n);
  i := 1;

  repeat
    write(0);
    i := i + 1;
  until i > n;
end.

Но важно: цикл repeat выполнится хотя бы один раз, даже если n = 0. Поэтому более правильный вариант с repeat такой:

pascal
var
  n, i: integer;

begin
  readln(n);
  i := 1;

  if n > 0 then
    repeat
      write(0);
      i := i + 1;
    until i > n;
end.

Самый безопасный ответ для задачи

Лучше использовать цикл while, потому что он не выполнится ни разу, если введено 0.

Итоговый вариант:

pascal
var
  n, i: integer;

begin
  readln(n);
  i := 1;

  while i <= n do
  begin
    write(0);
    i := i + 1;
  end;
end.