ЯК звести в ступінь в pascal :: звести число до степеня одна друга

Мова програмування Паскаль відрізняється від більшості інших тим, що в ньому відсутня оператор піднесення до ступінь. Тому фрагмент програми для здійснення цього математичного дії доводиться складати самостійно.

Інструкція

Найбільш простий випадок виникає, коли число необхідно звести в невелику цілу позитивну ступінь. Таке математичне дію можна виконати буквально за один рядок. Наприклад, якщо число необхідно завжди зводити в четверту ступінь, скористайтеся такою рядком: b: = a * a * a * a-Самі змінні a і b повинні мати тип, відповідний діапазону і виду чисел, що піддаються зведенню в ступінь.

Якщо число також зводиться в цілу і позитивну ступінь, але вона велика, і, до того ж, може змінюватися, скористайтеся циклом. Для цього помістіть в програму такий фрагмент: c: = a-if b = 0 then c: = 1-if b> = 2 then for i: = 2 to b do c: = a * c-Тут a - число, яке підлягає зведенню в ступінь, b - показник ступеня, c - результат. Змінні i і b - обов'язково типу integer.

Щоб звести число в дробову ступінь, скористайтеся властивостями логарифмів. Відповідний фрагмент програми при цьому буде виглядати так: c: = exp (b * ln (a)) - Даний спосіб не дозволяє працювати з нулем і негативними числами. Для усунення першого з цих недоліків скористайтеся такою конструкцією: if a = 0 then c: = 1 else c: = exp (b * ln (a)) - Це дозволить обійти обмеження на діапазон значень вхідного параметра натурального логарифма, який при нулі не має математичного сенсу. Другий недолік, однак, залишиться в силі: зводити в ступінь негативні числа по колишньому не вдасться. Всі змінні використовуйте типу real.

Щоб звести в ступінь негативне число, візьміть його модуль, підставте в попередній вираз, після чого поміняйте знак результату. На мові Паскаль це буде виглядати наступним чином: c: = (- 1) * exp (b * ln (abs (a))) - Потім, якщо сама ступінь є парною, візьміть модуль від результату: if round (b / 2) = b / 2 then c: = abs (c) -

Іноді виникає необхідність в універсальному фрагменті програми, що дозволяє здійснювати зведення в ступінь щодо будь-яких чисел. Тоді складіть його наступним чином: c: = 0-if a0 then c: = exp (b * ln (a)) - if b = 0 then c: = 1-if round (b / 2) = b / 2 then c : = abs (c) -Тут всі змінні - також типу real.