Вопрос Написать простую программу на Паскале

[alternat]

Напишите данную программу, чтоб PascalABC прочел и желательно с отступами.
//otvet.imgsmail.ru/download/221368636_d73b0f2d2c4a37396b67c64d6c4768b3_800.png