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

@Валечка · Регистрация: 25.09.2011

1)описать рекурсивную функцию power(x,N) вещественного типа,находящую значение N-й положительной степени натурального числа x
2)Описать процедуру PowerA3(A,B) вычисляющую третью степень числа А ,и возвращающую ее в переменной В(А- входной,В-выходной параметр,оба параметра являются вещественными)
3)описать функцию CircleS(R) вещественного типа, находящую площадь круга R ( вещественное число).C помощью этой функции найти площадь круга с данным радиусом.Площадь круга радиуса R вычисляется по формуле S=PxR^2

помогите решить задачи.

@stimo15 · 01.11.2011, 23:51

3)

Pascal

program func;
uses crt;
var s,r,n:real;
function circle(r1:real):real;
var s1:real;
begin
s1:=pi*sqr(r1);
circle:=s1;
end;
begin
clrscr;
write('R=');
readln(r);
n:=circle(r);
writeln('S=',n:6:2);
readkey
end.

@Dekio · 01.11.2011, 23:54

Сообщение от Валечка

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

Pascal

procedure TPow(a: Real; var b: Real);
begin
  b:=a*a*a;
end;

@Валечка · 02.11.2011, 00:08 **[ТС]**

спасибо

@Валечка 0 / 0 / 0 Регистрация: 25.09.2011 Сообщений: 11
		1
	Описать процедуру PowerA3 (A, B) вычисляющую третью степень числа А 01.11.2011, 22:29. Показов 2282. Ответов 3 Метки нет (Все метки) 1)описать рекурсивную функцию power(x,N) вещественного типа,находящую значение N-й положительной степени натурального числа x 2)Описать процедуру PowerA3(A,B) вычисляющую третью степень числа А ,и возвращающую ее в переменной В(А- входной,В-выходной параметр,оба параметра являются вещественными) 3)описать функцию CircleS(R) вещественного типа, находящую площадь круга R ( вещественное число).C помощью этой функции найти площадь круга с данным радиусом.Площадь круга радиуса R вычисляется по формуле S=PxR^2 помогите решить задачи. 0

@Валечка 0 / 0 / 0 Регистрация: 25.09.2011 Сообщений: 11
	02.11.2011, 00:08 [ТС]	4
	спасибо 0

Опции темы

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

Решение