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

* Вычислить квадрат разности двух чисел, вводимых с клавиатуры.

Question

Вивея

29 июня, 19:11

+5

Ответы (1)

Знаете ответ?

Динуся · Answer 1

Var A, B:real;

Begin

Write ('Введите два числа: ') ; ReadLn (A, B) ;

WriteLn (' (A-B) ^2 = ', Sqr (A-B)) ;

End.

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