Запросить с клавиатуры натуральное число n. Используя циклы, вывести через пробел n раз на экран цифру 1.
Program z1; var n,i:integer; begin writeln('Введите число n:'); readln(n); For i:=1 to n do write('1 '); end.