Question

1. Составьте на языке Паскаль программу решения следующей задачи:
Считая три введенных натуральных числа a,b,c длинами сторон треугольника, вычислить его периметр и площадь.
Указание к решению: Для вычисления площади можно воспользоваться формулой Герона
, где p –это полупериметр треугольника.
2. Опишите в синтаксисе паскаля следующие вычисления:
Дано действительное число a. Не пользуясь никакими другими арифметическими операциями, кроме умножения, получить: а6 за 3 операции; а21 за 6 операций; а10 за 4 операции.

Answer 1

Задание 1

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017

begin
  var a,b,c:real;
  Read(a,b,c);
  var p:=a+b+c;
  Writeln('P=',p);
  p/=2;
  Writeln('S=',sqrt(p*(p-a)*(p-b)*(p-c)))
end.

Задание 2.
a⁶ = (a²)×((a²)²)
a:=a*a; b:=a*a; b:=b*a;

a²¹ = a¹⁶×a⁴×a¹; a⁴ = ((a²)²); a¹⁶=(a⁴×a⁴)²
b:=a*a; b:=b*b; c:=b*b; c:=c*c; c:=c*b; c:=c*a;

a¹⁰ = a⁸+a²; a⁸ = ((a²)²)²
b:=a*a; a:=b*b; a:=a*a; b:=a*b;