Составить программу вывода любого числа любое заданное число раз в одну
строчку. Язык программирования: Паскаль.

не понял, откуда ты это выдрал?

WTF? Или вы реально прикалываетесь?

varz,k:integer;beginwriteln('zchislo: '); readln(z);writeln('povtori: '); readln(k);while k<>0 dobegink:=k-1;write(z);end;end.

var a,n,i:integer;beginwrite('Введите число a=');read(a);write('Скольrо раз вывести n=');read(n);for i:=1 to n dowrite(a,' ');end.