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

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