var a:integer; begin writeln ('Ââåäèòå ÷åòûðåõçíà÷íîå ÷èñëî'); readln (a); writeln ('ïðîèçâåäåíèå âòîðîé è ÷åòâåðòîé öèôð ðàâíî ',((a div 100) mod 10)*(a mod 10)); end.