Позначте, які події у запропонованому списку можна подати алгоритмами із вкладеними розгалуженнями: а) проїзд автомобіля через перехрестя, яке регулюється б) вибір одягу для прогулянки за різної погоди
в) проведення часу з 9.00 до 14.00 у різні дні тижня
г) приготування піци
д) догляд за кімнатними рослинами
1)![2*6^0 + 0*6^1 + 1*6^2 + 5*6^3](/tpl/images/1470/3043/8ac9e.png)
2) 3 единицы
3) 24D
4) 6
5) 2 раза
Объяснение:
2)![37_{10} = 100101_{2}](/tpl/images/1470/3043/67895.png)
3) Переводим число
в 16-ичную систему счисления, для этого делим его на 16 и запоминаем остаток. Затем результат деления также делим на 16 и запоминаем остаток. Повторяем эти действия до тех пор, пока частное не будет равно 0:
589 : 16 = 36, остаток 13
36 : 16 = 2, остаток 4
2 : 16 = 0, остаток 2
Затем записываем остатки от деления в обратном порядке: 2 4 13
Заменяем числа больше 9 на буквы
(10 - A; 11 - B; 12 - C; 13 - D; 14 - E; 15 - F)
Результат:![24D_{16}](/tpl/images/1470/3043/618b8.png)
4)
5) Посчитаем от 1 до 10 в 6-ичной системе счисления:
1 2 3 4 5 10 11 12 13 14
//PascalABC.NET версия 3.2, сборка 1389
//Если программа не запускается, то обновите версию
uses System.Linq;
begin
writeln('III');
var a := ReadArrInteger('Документы', ReadInteger('n=')).ToList;
writeln;
while a.Any() do
begin
write(a[0], ' ');
a.RemoveAt(0);
if not a.Any then break;
write(a.Last, ' ');
a.RemoveAt(a.Count - 1);
if not a.Any then break;
var n := 0;
if a.Count > 1 then n := a.Count div 2 - 1;
write(a[n], ' ');
a.RemoveAt(n);
end;
end.
Объяснение: