Ребят, очень нужна Написать программу перевода целого числа из 10с.с. В 2с.с.
(Паскаль)
KendallK
3
13.05.2020 20:55
0
Другие вопросы по теме Информатика
Podokonik
02.04.2019 20:21
tatyanamost
02.04.2019 20:19
LIZASSS1345
02.04.2019 20:18
saida2514
02.04.2019 22:14
танзила016
05.10.2019 21:20
ybrfyjh
05.10.2019 21:20
artemazarenko
05.10.2019 21:20
Dewerro
05.10.2019 21:20
TaniaAl
24.11.2021 14:46
Yaroslavdonskk
24.11.2021 14:49
Популярные вопросы
- По возникновения социальные группы могут быть: а) легальные и нелегальные...
1 - Составить план рассказа ель т янссон....
2 - Во сколько раз австралия меньше антарктиды?...
2 - Впосёлке 18 деревянных домов. это на 4 больше, чем каменных. сколько каменных...
3 - За что люди пошли за конфуцием? кратко....
3 - Постройте развёрнутый угол.разбейте этот угол двумя лучами на три угла так,чтобы...
2 - Основные события красавица и чудовище...
3 - Через точку о пересечения диагоналей квадрата, сторона которого равна ɑ,...
1 - Определить вид треугольника со сторонами 3,5,7...
2 - Какое значение ускорения свободного падения получит ученик при выполнении...
1
program ss102;
var a,b,c,i,v:integer;
begin
readln(a);
v:=0;
b := a;
while a > 0 do begin
b = b div 10;
c = c + 1;
end;
for i:=0 to c do begin
b:=a mod 2;
a:=(a-b) div 2;
v:=v + b*exp(i*In(10));
end;
writeln(c);
end.