Задача 1 Урок 10.1

Задача 1 Урок 10.1

Выведите на экран, все числа N единиц (число задает пользователь), например, для N=2, должно быть выведено::

11

для N=9, должно быть выведено:

111111111

Решение:

var a,i: integer;
begin
  writeln('insert number');
  readln(a);
  for i:=1 to a do
    write(1,'');
  readln();
end.