Question

Напишите программу, которая выводит в строчку 512 букв 'k'
в приложении PascalABC

Answer 1

var i: integer;
begin
for i:=1 to 512 do write('k');
readln;
end.