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

Primary tabs

Submitted by talker on Sun, 02/12/2023 - 21:36

Выведите на экран, все числа N единиц (число задает пользователь)

var N, i: integer;
begin
  readln(N);
  for i:=1 to N do
      write(1);
  readln();
end.