Что будет выведено на экран после выполнения следующих операторов, если с клавиатуры пользователь введет число 3712? . . . Var a, b, c, d : Integer; . . . ReadLn(a); b := a Mod 1000 Div 100; c := a Div 10 Mod 10; d := a Mod 10000 Div 100; WriteLn(’в числе ’, a, ’ содержатся ’); Write (b : 4); Write (c : 4); WriteLn(d : 4);