Question

Составить программу формирующую символьную строку состоящую из n звездочек

Answer 1

var n:integer;

st:string;

begin

readln(n);

while not (length (st)=n) do st+="*";

writeln(st);

end.