Turbo pascal » Страница 10
-Общие вопросы.
возведение числа в степень я правильно понял ?
если да то вот ход решения задачи: Чтобы возвести число в степень, его надо умножить само на себя количество раз, равное показателю степени. Т.е. возведение числа n в степень d будет выглядеть так: nd = n1 * n2 * n3 * … * nd, где индексы внизу просто указывают очередное по счету n. Если d равно нулю, то, какое бы число не стояло в основании степени, результат всегда будет равен единице: n0 = 1.
program step;
var
num, deg: integer;
res: real;
i: byte;
begin
write ('число: '); readln (num);
write ('степень: '); readln (deg);
res := 1;
i := 0;
while i < abs(deg) do begin
res := res * num;
i := i + 1
end;
if deg < 0 then
res := 1 / res;
writeln (res:10:5);
readln
end.
-------------
добавлено в 10.17: это вариант с циклом. можно сделать и без. предлагайте свои алгоритмы.
выражение "определяющую степень числа" вообще не имеет смысла, имхо.
MihalycH68, а все-таки, как выглядело задание? Чисто спортивный интерес.
Привет! Нужна помощь в решении контрольной - даю 200рублей
Функция y(x) задана двумя способами: формулой y = f(x) и ее разложением в бесконечный ряд S.
Разработать программу вычисления точного yT и приближенного yP значений функции y(x) при изменении её аргумента x от a до b с шагом Dx. Приближенное значение вычислять путем суммирования членов ряда до достижения требуемой точности (|УT - УP| ). Предусмотреть завершение процесса суммирования членов ряда по заданному максимальному номеру члена ряда n для предотвращения зацикливания итерационного цикла. Результаты расчетов вывести в виде следующей таблицы.
Суммирование ряда Аргумент Точное значение Приближенное значение Количество слагаемых Ошибка
далее прилагается формула (в прикрепленном)
(10, 58 Kb)
Помогите пожалуйста разобраться. Не первый год на форуме, а ориентироваться в темах так и не научился. Если не туда пишу - прошу простить.
Дело вот в чем. Изредка увлекаюсь изучением паскаля. Раньше писал программки на рабочем пк, но сейчас мне админы запретили ставить какие либо проги на служебный пк. Не хочу с ними ругаться. Ну их.
У меня есть н8, вот хотелось бы мне на нем писать програмки. Чтоб хотя бы можно было запустить файл .pas , пусть не .ехе .
Чтото я поиск помучал, но ничего не нашел.
- «
- 1
- 2
- --
- 9
- 10
- 11
- »
- #

