Question

вам дано выражение вида а^b,где а произвольное.целое число, а b - целое положительное число .Определите знак выражения a^b:1)если а^b>0 выведите 1 2) если а^b =0 выведите 0 3)если а ^b<0 выведите -1. ПАСКАЛЬ СРОЧНО!!!!!

Answer 1

Тебя зовут данил? вова? или как скажи

Answer 2

В Паскале можно написать такую функцию:

sqlCopy code
function Sign(a: integer; b: integer): integer;
begin
  if a = 0 then
    Sign := 0
  else if b mod 2 = 0 then
    Sign := 1
  else if a > 0 then
    Sign := 1
  else
    Sign := -1;
end;

Объяснение:

• Если a = 0, то a^b = 0, и знак выражения равен 0.
• Если b четное число, то a^b всегда положительно или ноль, и знак выражения равен 1.
• Если b нечетное число и a > 0, то a^b всегда положительно, и знак выражения равен 1.
• Если b нечетное число и a < 0, то a^b всегда отрицательно, и знак выражения равен -1.