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

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