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

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