Первая анимация

Xakep, номер #045, стр. 045-063-4

:= на =

== на =

begin на {

end на }

и так далее.

Имена функций одни и те же, разница только в синтаксисе. А еще тебе нужно будет изменить имена типов.

У меня Integer, у тебя Int, у меня Real, у тебя Float (и сначала ставится тип, а потом имя переменной).