Решение задач (Pascal)

[Electorat]

1. Вычислить радиус описанной окружности равностороннего треугольника со стороной a.
2. Вычислить диагонали прямоугольника, зная его площадь и сторону а.
3. Вычислить за 7 операции a^16.
4. Вычислить за 7 операции a^29.

[SaLoKiN]

и что-что?

[ZX Spectrum-128]

Проблема в математике или в программировании?

[Mad_Cat]

1

read(a);;
write(a/sqrt(3));

2)

read(a,s);
b:=s/a;
c:=sqrt(a*a+b*b);

[Electorat]

Сообщение от Mad_Cat

1

read(a);;
write(a/sqrt(3));

2)

read(a,s);
b:=s/a;
c:=sqrt(a*a+b*b);

Выражаю благодарность.

[Аватар]

3

a2:=x*x;
a4:=x*x*a2;
a16:=a4*a4*a4*a2*a2;

4

a2:=x*x;
a4:=a2*a2;
a8:=a4*a4;
a16:=a8*a8;
a29:=a16*a8*a4*x;