Вопрос Помогите задание по программированию в pascal ABC.

[webt r3262]

Первое задание на 4 второе на 5 заболел перед этой темой помогите.
//otvet.imgsmail.ru/download/176454686_48a6ee68d8044a3552bc96376abd19a6_800.png