Написать программу в которой 20 раз выводится символ @

Var  i:integer; begin  for i:=1 to 20 do  write('@'); end.