составить программу ввода с клавиатуры трех чисел ,вывода на экран их значений ,а также суммы между квадратом первого числа и удвоенным произведением двух оставшихся чисел

Program n1;var a,b,c: real;beginreadln(a,b,c);writeln('a=',a);writeln('b=',b);writeln('c=',c);writeln(a*a+2*b*c);end.