Написать программу на языке паскаль, возведение числа в степень. степень вводится с клавиатуры.

186

311

Посмотреть ответы 3

Ответы на вопрос:

Pahnet

Информатика

4,5(9 оценок)

Возведение вещественного числа x в натуральную степень n (без использования стандартных функций): var n,i: integer; x,xn: real; begin write('x = '); readln(x); write('n = '); readln(n); xn: =1; for i: =1 to n do xn: =xn*x; writeln('xn = ',xn: 6: 3); end. пример: x = 2n = 5xn = 32

Adn2001

Информатика

4,8(63 оценок)

Только степень вводится с клавы: var p: integer; st: real; begin write('показатель степени(целое число) = '); readln(p); st: =1; for p: = 1 to p do st: =st*2; writeln('2^',p,' = ',st); end. пример: показатель степени(целое число) = 4 2^4 = 16 степень и число вводится с клавы: var p: integer; st,o: real; begin write('показатель степени(целое число) = '); readln(p); write('основание степени(вещественное число) = '); readln(o); st: =1; for p: = 1 to p do st: =st*o; writeln(o,'^',p,' = ',st); end. пример: показатель степени(целое число) = 3 основание степени(вещественное число) = 2.5 2.5^3 = 15.625