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

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