Question

Помогите решить задачу по информатике через Турбо Паскаль, вот всё, что сказано в условии задачи:
* Вычислить квадрат разности двух чисел,вводимых с клавиатуры.

Answer 1

Var A,B:real;
Begin
Write('Введите два числа: ');ReadLn(A,B);
WriteLn('(A-B)^2 = ',Sqr(A-B));
End.