#1
алг
нач
нц пока не слева свободно
закрасить
вниз
кц
вверх
нц пока справа свободно
вправо
закрасить
кц
нц пока не справа свободно
закрасить
вверх
кц
вниз
кон
13*16^3+9*16^2+5*16+5=55637
55637/2, остаток 1,
27818/2, остаток 0,
13909/2, остаток 1,
6954/2, остаток 0,
3477/2, остаток 1,
1738/2, остаток 0,
869/2, остаток 1,
434/2, остаток 0,
217/2, остаток 1,
108/2, остаток 0,
54/2, остаток 0,
27/2, остаток 1,
13/2, остаток 1,
6/2, остаток 0,
3/2, остаток 1,
1/2, остаток 1.
Итого: 1101100101010101, 7 нулей.
Блок - схема, видимо вроде такого вам надо )
Real - вещественный тип данных, значит все выражения с переменной a считаються вещественными.
1) целое.
2) целое.
3) вещественное.
4) вещественное.
5) целое.
Var n:integer;
begin
write('n = ');
readln(n);
writeln('в числе десятков = ',n mod 100 div 10);
writeln('в числе единиц = ', n mod 10);
end.
Пример:
n = 125
в числе десятков = 2
в числе единиц = 5