Question

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

Answer 1

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

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