Var numb,sot,des,ed:integer;
begin
readln(numb);
sot:= numb div 100;
des:= numb mod 100;
des:=des div 10;
ed:= numb mod 10;
writeln('сотни=',sot,' десятки=',des,' единицы=',ed);
<span>end.</span>
Язык программирования устанавливает набор правил, определяющих внешний вид программы и действия, которые выполнит исполнитель под ее управлением.
А система программирования это внутренний код программы, который исполняет действия заданным в систему