Даны три действительных числа. Если только два из них равны между собой, то возвести все числа в квадрат и напечатать в противном случае напечатать все три числа. Написать программу

Question

Информатика

Нюраша

19 января, 17:26

Даны три действительных числа. Если только два из них равны между собой, то возвести все числа в квадрат и напечатать в противном случае напечатать все три числа. Написать программу

+4

Ответы (1)

Знаете ответ?

Эсфирь · Answer 1

Var

a, b, c : real;

begin

read (a, b, c) ;

if (a = b) xor (b = c) xor (a = c) then / / если только одно из равенств верно

write (sqr (a), ' ', sqr (b), ' ', sqr (c))

else write (a, ' ', b, ' ', c) ;

end.