Запишите на языке паскаль (37/48)

Запишите на языке паскаль