Введите с клавиатуры три числа если все числа отрицательны и не равны между собой то замените числа их квадратами и выведете результат на экран если всечисла равны 0 то сделайте их соответственно равными 5, 20,15 и выведете результат. Иначе найдите и выведете сумму чисел.(в паскале)
Uses crt; var x,y,z:real; begin readln(x,y,z); if (x<0) and (y<0) and (z<0) and (x<>y) and (x<>z) and (y<>z) then write(x*x,', ',y*y,', ',z*z) else if (x=0) and (y=0) and (z=0) then write('5, 20, 15') else write(x+y+z); end.
