паскаль 2

Program reshebnik; Var a, b, c: integer; begin WriteLN (’Введите число A:’); ReadLN (a); WriteLN (’Введите число B:’); ReadLN (b); c := a b; WriteLN (’Ответ’, c); end.