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

Question

Информатика

Радим

3 мая, 06:17

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

+3

Ответы (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.