Подати у словесній і графічній формах алгоритм знаходження величини виразу (a – b)∙(c – d), де a, b, c, d — дані дійсні числа. Потрібно зробити для Lazarus ​

Вот алгоритм нахождения величины выражения (a – b)∙(c – d) в словесной форме:

1. Введите значения переменных a, b, c и d.
2. Вычислите значение выражения (a – b).
3. Вычислите значение выражения (c – d).
4. Умножьте результаты вычислений шагов 2 и 3.
5. Выведите результат.

Вот пример кода для Lazarus:

var

 a, b, c, d: Real;

 result: Real;

begin

 Readln(a);

 Readln(b);

 Readln(c);

 Readln(d);

 result := (a - b) * (c - d);

 Writeln(result);

end.