ПОМОГИТЕ ОЧЕНЬ ПРОШУ!!!НАПИСАТЬ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ!!! БУДУ ОЧЕНЬ БЛАГОДАРНА!
Приложения:
Ответы
Ответ дал:
2
var
n:integer;
a:real;
begin
writeln('введите число и степень');
readln(a,n);
writeln('степень : ', exp(ln(a)*n));
writeln('корень: ',exp(ln(a)*(1/n)));
end.
n:integer;
a:real;
begin
writeln('введите число и степень');
readln(a,n);
writeln('степень : ', exp(ln(a)*n));
writeln('корень: ',exp(ln(a)*(1/n)));
end.
Аноним:
спасибо
Только бы еще проверить значения на ОДЗ, а то программа будет чудеса выдавать... Плюс, Ваш вариант программы не сможет работать с отрицательными степенями, не говоря уже об отрицательных основаниях при четных целых степенях.
Впрочем, с отрицательным основанием я переборщил - в условии сказано, что оно положительное. Но вот о том, что n - натуральное, не сказано.
Вас заинтересует
11 месяцев назад
11 месяцев назад
6 лет назад
6 лет назад
7 лет назад