Введены 2 числа а и с составьте программу вычисления их суммы и произведения
Program z1; var a, c, x: integer; begin Writeln('Введите A:'); readln(a); Writeln('Введите C:'); readln(c); x := a * c; Writeln('Ответ:', x); end.