Ввести два неравных числа A и B. Выяснить что больше B^A или

A^B,

при этом выведя на экран оба значения.

Question

Информатика

Рита

12 января, 05:56

Ввести два неравных числа A и B. Выяснить что больше B^A или

A^B,

при этом выведя на экран оба значения.

+3

Ответы (1)

Знаете ответ на вопрос?

Дара · Answer 1

Pascal ABC

Var A, B:real;

Begin

Write ('A = ') ; ReadLn (A) ;

Write ('B = ') ; ReadLn (B) ;

if Power (A, B) >Power (B, A) then WriteLn (Power (A, B),' > ', Power (B, A))

else WriteLn (Power (A, B),' < ', Power (B, A))

End.

Ввести два неравных числа A и B. Выяснить что больше B^A илиA^B,при этом выведя на экран оба значения.

Ввести два неравных числа A и B. Выяснить что больше B^A или

A^B,

при этом выведя на экран оба значения.