Даны два целых двузначных числа. произведения этих чисел. Составьте код программы.​

Variant 1;

program HappyCoder; var  a, b, c: integer; begin  Writeln('Введите A и B: ');  Read(A, B);  c := A * b;  Writeln('Произведение равно: ', c); end.

Varian 2;

begin  var (A, b) := ReadInteger2;  Println(A * b); end.