readln (A, B); - вводим значения А В
C:=(A+B) * (B-A); - выполняем уравнение
writeln (C) - выводим результат
В итоге получается (если введём A = 7, а B = 8)
С=(7+8)*(8-7)
C=15
readln (A, B); - вводим значения А В
C:=(A+B) * (B-A); - выполняем уравнение
writeln (C) - выводим результат
В итоге получается (если введём A = 7, а B = 8)
С=(7+8)*(8-7)
C=15