Составить программу для вычисления значения переменной c, если c=a2+b*a. все числа считать целыми, a и b вводятся с клавиатуры

Program z1;
var a,b,c: integer;

begin
readln (a,b);
c:=0;
c:=sqr(a)+(b*a);
write (c);
end.