Решите Паскаль пожалуйста как можно скорее

Question

Решите Паскаль пожалуйста как можно скорее

---

Answer 1

Golov:=3*(n mod 101); // Считаем количество голов до 100 лет включительно 
if n>100 then 
golov:=300+(n-100)*2; // Только в том случае, если дракону более 100 лет, добавляем по 2 головы на лишний год
Смогла это

Answer 2

1.Если дракону сто лет или меньше, то у него 3N голов.  Если ему больше ста лет, то у него 300+2(N-100) голов.

2.Высказывание: «Число A является положительным» на  языке Pascal записывается как присваивание логической  переменной f математического эквивалента (A > 0)