написать программку которая поменяет значения трёх переменных 2а-5,3*в и с^2+4 введённых

Program one;
var a,b,c:real;
begin
writeln('2a-5.3*b');
writeln('Введите значения переменных а и b');
readln(a,b);
writeln('Итог: ',2*a-5.3*b);
writeln('c^2+4');
writeln('Введите значение переменной с');
readln(c);
writeln('Итог: ',c*c+4);
end.
Во вложении фото как работает программа