Question

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

Answer 1

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.