Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/8: Рейтинг темы: голосов - 8, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 23.04.2013
Сообщений: 5
1

Описать процедуру, вычисляющую третью степень числа

23.04.2013, 13:36. Показов 1609. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте, нужна ваша помощь в пяти различных заданиях по турбо паскалю, буду премного благодарен, если вы мне поможете их сделать
Задание 3
Описать процедуру, вычисляющую третью степень числа A и возвращающую ее в переменной B . С помощью этой процедуры найти третьи степени пяти данных чисел.
Ввод:
А
5 целых чисел
Вывод:
Ответ:
А3
5 чисел через пробел в 3 степени
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.04.2013, 13:36
Ответы с готовыми решениями:

Описать процедуру PowerA3 (A, B) вычисляющую третью степень числа А
1)описать рекурсивную функцию power(x,N) вещественного типа,находящую значение N-й положительной...

Описать процедуру PowerA3(A, B), вычисляющую третью степень числа
Описать процедуру PowerA3(A, B), вычисляющую третью степень числа A и возвращающую ее в переменной...

Описать процедуру, вычисляющую третью степень числа и возвращающую ее в новой переменной
Описать процедуру Power{A}_{3}(A,B), вычисляющую третью степень числа A и возвращающую ее в...

Описать процедуру RectPS (x1, y1, x2, y2, P, S), вычисляющую периметр P и площадь S прямоугольника
Описать процедуру RectPS (x1, y1, x2, y2, P, S), вычисляющую периметр P и площадь S прямоугольника...

2
3030 / 1916 / 1649
Регистрация: 30.04.2011
Сообщений: 3,060
23.04.2013, 14:20 2
Лучший ответ Сообщение было отмечено M1STERDaemon как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Procedure power3(a: Integer; var b: Integer);
begin
  b:=a*a*a;
end;
 
Var
  i: Byte;
  x,y: Integer;
BEGIN
For i:=1 to 5 do
begin
  Readln(x);
  power3(x,y);
  Writeln(y);
end;
Readln
END.
0
0 / 0 / 0
Регистрация: 16.04.2013
Сообщений: 21
24.04.2013, 13:05 3
Kodzaev, пожалуйста помоги с задачей,очень очень надо

https://www.cyberforum.ru/turb... 47185.html
0
24.04.2013, 13:05
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.04.2013, 13:05
Помогаю со студенческими работами здесь

Возвести в квадрат отрицательные числа и в третью степень
13. Даны три целых числа. Возвести в квадрат отрицательные числа и в третью степень — положительные...

Возвести в квадрат отрицательные числа и в третью степень — положительные
Даны три целых числа. Возвести в квадрат отрицательные числа и в третью степень — положительные...

Операторы цикла- задача. Возвести в третью степень числа от 1 до 10
ЗАДАЧА Составить программу возведения в третью степень чисел от 1 до 10 Составить три программы...

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


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru