Đoạn chương trình sau sẽ thực hiện công việc gì?

Đoạn chương trình sau sẽ thực hiện công việc gì?
Var i:integer
Begin
For i:=5 to 50 do writeln ('A');
End.