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

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