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

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