Помогите с паскалем

Никогда не писал на Паскале, ибо хрень редкостная. Поэтому держи код мейден ин chatGPT, но выводит он всё правильно, если судить по формулам: program Expression; var a, b, result: real; begin write('Введите значение a: '); readln(a); write('Введите значение b: '); readln(b); result := (sqr(a) - 2 * a * b + sqr(b)) * sqr(a); writeln('Результат: ', result:0:2); readln; end.