Дано 5 ти значное число 54321 найти произведение 2 и 4 цифры
4*2=8 Но если нужна программа, то вот: var a: word; b: byte; begin readln(a); b := a mod 100 div 10; a := a div 1000 mod 10; writeln(a, ' * ', b, ' = ', a * b); end.