возведение в степень

@{KonFetKa} · Регистрация: 02.09.2009

Студворк — интернет-сервис помощи студентам

Вычислить 5(в третей)+3(в четвертой)+2(в седьмой),используя функцию возведения числа в степень.

@Puporev · 02.09.2009, 23:02

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
uses crt;
function Pow(a,b:integer):longint;
var i,s:integer;
begin
s:=1;
for i:=1 to b do
s:=s*a;
Pow:=s;
end;
begin
clrscr;
write('5^3+3^4+2^7=',Pow(5,3)+Pow(3,4)+Pow(2,7));
readln
end.

@schdub · 02.09.2009, 23:03

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses CRT;
 
function stepen(a:real; b:real) : real;
begin
  stepen := exp(b*ln(a));
end;
 
begin
  ClrScr;
  WriteLn('Otvet = ', (stepen(5, 3) + stepen(3, 4) + stepen(2, 7)):2:2);
  ReadLn;
end.

@Arriba · 02.09.2009, 23:05

{KonFetKa}, как я помню в паскале нет функции power(возведение в степень), если я ошибаюсь подправьте...

Вот кк моно сделать:

Pascal
1
2
3
4
5
6
7
8
var x:extended;
begin
   x:=Exp(3*ln(5));
   x:=x+Exp(4*ln(3));
   x:=x+Exp(7*ln(2));
   Write(x:1:0);
   ReadLn;
end.

Добавлено через 43 секунды
Воо сразу все выложили...

@Puporev · 02.09.2009, 23:06

Мужики, по заданию нужно написать свою функцию возведения целого числа в целую степень и все, а использование стандартных формул здесь не пойдет, люди учаться писать элементарные функции.

@Arriba · 02.09.2009, 23:20

Puporev, ага я это понял когда твой пост первый увидел,... спасиб, можешь лишее наше удалить...

@Puporev · 02.09.2009, 23:30

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

@odip · 03.09.2009, 22:29

В FreePascal есть функция:
function power(base: float;exponent: float) : float

Description: power raises base to the power power. This is equivalent to exp(power*ln(base)). Therefore
base should be non-negative.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .

@{KonFetKa} 0 / 0 / 0 Регистрация: 02.09.2009 Сообщений: 40

	возведение в степень 02.09.2009, 22:31. Показов 6307. Ответов 7 Метки нет (Все метки) Вычислить 5(в третей)+3(в четвертой)+2(в седьмой),используя функцию возведения числа в степень. 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	02.09.2009, 23:06
	Мужики, по заданию нужно написать свою функцию возведения целого числа в целую степень и все, а использование стандартных формул здесь не пойдет, люди учаться писать элементарные функции. 1

@Arriba 257 / 173 / 27 Регистрация: 17.10.2008 Сообщений: 770
	02.09.2009, 23:20
	Puporev, ага я это понял когда твой пост первый увидел,... спасиб, можешь лишее наше удалить... 1

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	02.09.2009, 23:30
	Не пусть все читает, для вещественных чисел формулы пригодятся. 1

@odip 7176 / 3234 / 82 Регистрация: 17.06.2009 Сообщений: 14,164
	03.09.2009, 22:29
	В FreePascal есть функция: function power(base: float;exponent: float) : float Description: power raises base to the power power. This is equivalent to exp(power*ln(base)). Therefore base should be non-negative. 0