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

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

Question

Исидор

30 октября, 15:21

+5

Ответы (1)

Знаете ответ на вопрос?

Степаха · Answer 1

Var A, B:real;

Begin

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

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

End.

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