Срочно плииз!!! Pascal составьте программу для вычисления произведения второй цифры и...

Question

Срочно плииз!!! Pascal составьте программу для вычисления произведения второй цифры и третьей цифры трехзначного целого числа, значение которого вводится с клавиатуры .

Answer 1

Var a, b, c, d:integer;
begin
Read(a);
b:=a mod 10;
c:=a mod 100;
d:=c div 10;
WriteLn(b*d);
end.