Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 25.12.2017
Сообщений: 14

Для заданных значений x и n вычислите y = x^n, где n - натуральное число

25.12.2017, 12:26. Показов 1275. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Для заданных значений x и n вычислите y = x^n, где n - натуральное число
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
25.12.2017, 12:26
Ответы с готовыми решениями:

Пусть дано вещественное число x и натуральное число п. Вычислите:(х- 2)(х- 4)(х- 2n )/(x-1)(x-3)(x- 2n- 1)
хелпаните решить задачку на Паскале АВС, не могу сделать уже четыре часа

Дано натуральное число N Вычислите сумму его цифр
3. Дано натуральное число N. Вычислите сумму его цифр.

Дано натуральное число N. Вычислите сумму его цифр
Дано натуральное число N. Вычислите сумму его цифр. При решении этой задачи нельзя использовать строки, списки, массивы (ну и циклы,...

6
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
25.12.2017, 12:27
Pascal
1
2
3
y:=1;
for i:=1 to n do
y:=y*x;
0
0 / 0 / 0
Регистрация: 25.12.2017
Сообщений: 14
27.12.2017, 13:30  [ТС]
потрясающее решение!
0
Модератор
10445 / 5737 / 3406
Регистрация: 17.08.2012
Сообщений: 17,454
30.12.2017, 20:48
Я бы сократил на одну итерацию:
Pascal
1
2
3
y:=x;
for i:=2 to n do
y:=y*x;
UltraBatya, это - стандартное и самое простое решение. По-хорошему для этой задачи лучше применить алгоритм быстрого возведения в степень.
0
58 / 42 / 21
Регистрация: 01.01.2018
Сообщений: 273
03.01.2018, 10:16
Есть же встроенная функция:
Pascal
1
y:=power(x,n);
0
03.01.2018, 10:18

Не по теме:

А мужики-то и не знали...

0
58 / 42 / 21
Регистрация: 01.01.2018
Сообщений: 273
03.01.2018, 12:53
Мужики тут умные, это видно. Но упор делается на спросившего. Откуда мы знаем, нужно ли ему просто посчитать или же реализовать функцию с нуля для понимания? Раз уж предлагаете варианты - предлагайте все.

Добавлено через 18 минут
И, раз уж речь зашла:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
function pow(x,n:integer):longint;
begin
  if n=0 then result:=1 else
  if n mod 2 = 0 then result:=pow(x,n div 2)*pow(x,n div 2) else result:=x*pow(x,n-1);
end;
 
var y:longint;
 
begin
  var x :=readinteger;
  var n :=readinteger;
  writeln(pow(x,n));
end.
Добавлено через 1 час 11 минут
Не подумавши прошлый вариант набрал. Теперь вроде меньше вычислений

Pascal
1
2
3
4
5
6
7
8
9
10
11
  if n=0 then result:=1 else
  if n mod 2 = 0 then result:=sqr(pow(x,n div 2)) else result:=x*pow(x,n-1);
end;
 
var y:longint;
 
begin
  var x :=readinteger;
  var n :=readinteger;
  writeln(pow(x,n));
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
03.01.2018, 12:53
Помогаю со студенческими работами здесь

Дано натуральное n, действительное число x. Вычислите в виде Pascal
Дано натуральное n, действительное число x.

Для заданного числа N составьте программу вычисления суммы S=1+1/2+1/3+1/4+…+1/N, где N – натуральное число
Нихрена не получается #include <iostream> using namespace std; int main() { int n; cin >> n; int s = 1; ...

Для заданного числа N составьте программу вычисления суммы S=1+1/2-1/3+1/4-1/5+.+1/n, где n натуральное число
Здравствуйте, помогите пожалуйста решить задание. Нужно написать код с помощью условного оператора на Java. Для заданного числа N...

Дано натуральное число n. Вычислите его множители, которые являются квадратичными
Добрый день (утро, вечер)! Начал изучение программирование, в частности на С++. Наткнулся на задачу, которую не знаю, как решить - дано...

Дано натуральное число n. Вычислите значение выражения:1/1!-1/2!+⋯+〖(-1)〗^(n+1) 1/n!
Помогите решить! Дано натуральное число n. Вычислите значение выражения:1/1!-1/2!+⋯+〖(-1)〗^(n+1) 1/n! Распишите...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
Жизнь в неопределённости
kumehtar 23.03.2026
Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения.
anaschu 23.03.2026
geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .
1С: Контроль уникальности заводского номера
Maks 23.03.2026
Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью. Данные берутся из регистра сведений, по которому настроено. . .
Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения
anaschu 22.03.2026
e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git
1С: Программный отбор элементов справочника по группе
Maks 22.03.2026
Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
1С: Программный отбор элементов справочника по значению перечисления
Maks 21.03.2026
Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru