Ответ :84
716 постоянно делим на 16 и ответ записываемых в обратном порядке ...все..
Ответ: Всего 5 пунктов
1)прием и первичную обработку документов→
2)предварительное рассмотрение и распределение документов→
3)регистрацию→
4)рассмотрение документов руководством→
5)передачу на исполнение.
<span>var
a,x:integer;
Sum: integer;
begin
WriteLn('введите целое число');
ReadLn( a );
x:= a;
</span>Sum<span>:= 0;
while ( x<>0 ) do
begin
</span>Sum := Sum<span> + (x mod 10);
x := x div 10;
end;
WriteLn( 'Сумма цифр числа ',a,' = ', </span>Sum<span> );
</span>Пока Х больше нуля:
Находим остаток от деления n на 10 (т.е. последнюю цифру числа), добавить его к сумме и увеличить произведение;Избавляемся от последнего разряда числа n путем деления нацело на число 10.
Var a,b,c:real;
begin
writeln('введите два катета');
readln(a,b);
c:=sqrt(sqr(a)+sqr(a));
writeln(c);
<span>end.</span>