Введите с клавиатуры три числа если все числа отрицательны и не равны между собой то замените числа их квадратами и выведете результат на экран если все числа равны 0 то сделайте их соответственно равными 5, 20,15 и выведете ре...
Введите с клавиатуры три числа если все числа отрицательны и не равны между собой то замените числа их квадратами и выведете результат на экран если все числа равны 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.
Не нашли ответ?
Похожие вопросы