Вы ввели число: 10100112 в двоичной системе счисления и
хотите перевести его в десятичную.
Для этого переведем его сначала в десятичную вот так :
10100112 = 1∙26+0∙25+1∙24+0∙23+0∙22+1∙21+1∙20 = 64+0+16+0+0+2+1 = 8310
Получилось: <span>8310</span>
Результат перевода:
<span>10100112 = 8310 </span>
<span>Объект, который указывает на текущее место в документе, называется курсор.</span>
Может можно как-то облегчить, но я не додумал еще.
Пока только так: 54/9=6 мест в купе
Program vagon;
var a,b,c,d,e:integer;
begin;
writeln ('Введите номер места');
read (a);
if a <6 then
writeln ('Купе первое');
if (a>6) and (a<12) then
writeln ('Купе второе');
if (a>12) and (a<18) then
writeln ('Купе третье');
if (a>18) and (a<24) then
writeln ('Купе четвертое');
if (a>24) and (a<30) then
writeln ('Купе пятое');
if (a>30) and (a<36) then
writeln ('Купе шестое');
if (a>36) and (a<42) then
writeln ('Купе седьмое');
if (a>42) and (a<48) then
writeln ('Купе восьмое');
if (a>48) and (a<54) then
writeln ('Купе девятое');
end.
"В"скорее всего, так как тут говориться про природу!
Название документа
строка меню
Строка формул
Рабочее поле
Бегунки
Строка состояния
Заголовки столбцов
Заголовка строк
Листы
Адрес ячейки
Общие элементы: Название документа, Строка меню, Строка состояния, Рабочее поле, бегунки