Запишите на языке паскаль следующие условия