Question

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

Answer 1

Var
z,k:integer;
begin
writeln('zchislo: '); readln(z);
writeln('povtori: '); readln(k);
while k<>0 do
begin
k:=k-1;
write(z);
end;
end.