Составить программы вычисляющие 1