Представляешь числа:
512 256 128 64 32 16 8 4 2 1
Составляем исло 793 из этих чисел(Где мы складываем,то ставим 1)
512(1) 256(1) 128(0) 64(0) 32(0) 16(1) 8(1) 4(0) 2 1(1) , получаем в двоичной системе 110001101
В 8-ричной:
793= 7*8^2+9*8^1+3*8^0=7*64+7*8+1=488+56+1=505 в 8-ричной
В 16-ричной
793=7*16^2+9*16^1+3^0=1937
1) Пароль в этом коде - "zn4n1j4". Заменить при необходимости.
var
i: integer;
s: string;
begin
i := 1;
while i <= 5 do
begin
readln(s);
if s = 'zn4n1j4' then
begin
writeln('Вход в систему разрешен');
exit;
end;
writeln('Неверный пароль.');
end;
writeln('Пароль не был угадан 5 раз.');
end.
2) Используем операцию x mod 10 для получения последней цифры числа и x div 10 для "отбрасывания" последней цифры числа.
var
x, ans: integer;
begin
read(x);
ans := 0;
while x <> 0 do
begin
ans := ans + (x mod 10);
x := x div 10;
end;
writeln(ans);
end.
ответы:
1) 4 раза
2) 5 раз
Поскольку цикл зависит от переменной x разберём только её:
1. x = 1 проверяем условие цикла 1 < 5 (да) цикл запускается х = 2
2. x = 2 проверяем условие цикла 2 < 5 (да) цикл запускается х = 3
3. x = 3 проверяем условие цикла 3 < 5 (да) цикл запускается х = 4
4. x = 4 проверяем условие цикла 4 < 5 (да) цикл запускается х = 5
5. x = 5 проверяем условие цикла 5 < 5 (нет) цикл не запускается
Следовательно цикл исполнится 4 раза.
При изменении условий на x <= 5
1. x = 1 проверяем условие цикла 1 <= 5 (да) цикл запускается х = 2
2. x = 2 проверяем условие цикла 2 <= 5 (да) цикл запускается х = 3
3. x = 3 проверяем условие цикла 3 <= 5 (да) цикл запускается х = 4
4. x = 4 проверяем условие цикла 4 <= 5 (да) цикл запускается х = 5
5. x = 5 проверяем условие цикла 5 <= 5 (да) цикл запускается х = 6
6. x = 6 проверяем условие цикла 6 <= 5 (нет) цикл не запускается
Следовательно цикл исполнится 5 раз.
в двоичной будет равно 1100011001
в восьмеричной равно 1431
в 16-ричной =319