Напишите программу на алгоритмическом языке языке блок схем и pascal, вычисляющую квадрат частного суммы двух чисел и их разности.

Program Program1;
var a,b,c,d,e,f:real;
begin  writeln('Введите число 1');readln(a);writeln('Введите число 2');readln(b);
c:=a-b; //Разностьd:=a+b; //Суммаe:=d/c; //Частноеf:=sqr(e); //Квадратwriteln('квадрат частного суммы двух чисел и их разности = ', f);
end.