C клавиатуры вводится трехзначное число подсчитать произведение цифр десятков и единиц ...

Question

C клавиатуры вводится трехзначное число подсчитать произведение цифр десятков и единиц



PascalABC

Answer 1

var a:integer;
begin
write('введите трехзначное число: ');
readln(a);
writeln((a div 10 mod 10)*(a mod 10));
end.

Пример:
348
32