1. Что будет выведено на экран после выполнения программы: Program sluch;
var a,b,c,s:integer;
begin
a:=random (100,999);
writeln(a);
b:=a div 100;
c:=a mod 100 div 10;
s:=a mod 100 mod 10;
writeln ('сотни ', b);
writeln ('десятки ',c);
writeln ('единицы ', s)
end.
