Складіть проект для обчислення значення виразу a+b-c:(a-2b). (Это надо сделать в Lazarus, pascal)

Vara,b,c:real;BeginWrite('a = ');ReadLn(a);Write('b = ');ReadLn(b);Write('c = ');ReadLn(c);WriteLn(a+b-c/(a-2*b));End.