Question

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.

Answer 1

Ответ: в файле результат программы

Там написано ↓

105

сотни 1

десятки 0

единицы 5

d4b2c54dc2e507aabed60e61800446a5.pas