Что будет выведено в результате работы программы на Pascal…: ответ 13263

Что будет выведено в результате работы программы на Pascal: program p1; var i:integer; procedure proc(var i:integer); begin i:=sqr(i); write(i); end; begin i:=5; proc(i); i:=i-5; writeln(i); readln; end.