Этап " Ахиллесова пята"

Начало эксперимента

Исследуемое равенство: (a²-b²)/(a-b)=a+b

Обсудив задачу, мы написали такую программу

program Togdestvo;
const p=100; {проверка тождества для p чисел}
var S1,S2,a,b:real; k,n:integer;
begin
  a:=-1;b:=3; K:=0;       {от 1 с шагом 0,03}
  for n:=1 to p do
  begin
    S1:=(a*a-b*b)/(a-b); S2:=a+b;
    if S1<>S2 then begin { writeln (x);} k:=k+1; end;
    a:=a+0.03;b:=b+0.03;
  end;
 writeln(k/p*100:0:0,'%')  
end.

После того, как мы запустили программу, появился результат 38%

Вот наша программа.

Затем мы рассмотрели свои примеры.
 Например, a/b=1/(b/a)

Вывод:

"ахиллесова пята" в вычислениях с вещественными числами

Конечный продукт:

Бонусное задание