P:=a; a=23 p s p 0 s:=0; while p 0 do begin s:=s+p mod 10; p:= p div 10; end; - id1106567920220903 от arinagrom22 03.09.2022 13:54

Question

Информатика: P:=a; a=23 p s p 0 s:=0; while p 0 do begin s:=s+p mod 10; p:= p div 10; end;

arinagrom22 · Accepted Answer

У вас есть число 137
если вам надо перевести его в какую-нибудь систему счисления, то нужно делить это число на номер системы, так если нужно перевести число 137 в ДВОичную ,то делим на 2 до тех пор, пока остатотк от деления не равен 1.(если в ТРОичную то на 3 и т.д.).
начнём:
137 / 2 = 68 выписываем остаток (1)
68   / 2 = 34 выписываем остаток (0)
34   / 2 = 17 выписываем остаток (0)
17   / 2 = 8   выписываем остаток (1)
8 / 2 = 4 выписываем остаток (0)
4   / 2 = 2   выписываем остаток (0)
2 / 2 = 1 <==   на этой единице заканчиваем деление, далее снизу вверх выписываем получившееся число : 001001;
ответ: 001001

P:=a; a=23
p s p>0

s:=0;
while p>0 do
begin
s:=s+p mod 10;
p:= p div 10;
end;

MOGZ ответил

P:=a; a=23 p s p>0 s:=0; while p>0 do begin s:=s+p mod 10; p:= p div 10; end;

MOGZ ответил

P:=a; a=23
p s p>0

s:=0;
while p>0 do
begin
s:=s+p mod 10;
p:= p div 10;
end;