Программа паскаль y x2