Question

PASCAL Из введённого 3-значного числа удалить вторую цифру и получившееся двухзначное число умножить на эту цифру.

Answer 1

Ответ:

program chislo;

var a,b:Integer;

begin

readln (a);

b:=(a div 10) mod 10;

a:=(a div 100)*10+a mod 10;

writeln (a*b);

end.

Answer 2

PascalABC.NET

Ответ:

• uses School;
• begin
•  var a := ReadInteger.Digits;
•  Print((a[0]*10 + a[2]) * a[1])
• end.

Пример работы:

Answer 3

Давайте разберемся с этой задачей. Предположим, что у нас есть 3-значное число ABC, где A, B и C - это цифры числа. Сначала мы удаляем вторую цифру B и получаем число AC. Затем умножаем это число на цифру B.

Пример: Пусть ABC = 385. Тогда удаляем вторую цифру B = 8 и получаем AC = 35. Затем умножаем 35 на B = 8: 35 * 8 = 280.

Итак, для числа 385:

1. Удаляем вторую цифру: 385 -> 35.
2. Умножаем полученное двузначное число на удаленную цифру: 35 * 8 = 280.

Таким образом, для данной задачи, если у вас есть 3-значное число, вы можете удалить вторую цифру, затем умножить полученное двузначное число на удаленную цифру, как показано в примере.