Запиши программу на языке паскаль (47/48)

Запиши программу на языке паскаль