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

Question

Составить программу чтобы компьютер сто раз написал имя на экране в строчку в систему паскаль

Answer 1

Program;
var a: integer
begin
write('Имя');
readln(a);
write(a,a,a,a) //тут должно быть сто а
end.
По-другому незнаю