program Positiv;
var i:integer; x,sum:real;
begin
sum:=0;
for i:=1 to 10 do
begin
write('введите ',i,'-е число: ');
readln(x);
if x>0 then sum:=sum+x;
end;
writeln('Cумма положительных чисел равна ',sum);
end.
Берём вес города А за 1. В город Б дорога идёт только из А значит он весит тоже 1. В город В идёт дорога из Б и Д ( Д весит 1 така как в него дорога только из А) значит 1+1 значит город в весит 2. Ну и так по порядку , потом в конце складывает вес городов из которых есть дорога в Л, это и будет ответ. ( Ну можно и просто посчитать , но это сложно и можно ошибиться) Ответ 14
по формуле N=
32=
32=
=
откуда i=5 бит
Получается что 1 буква алфавита несет 5 бит
в помощь таблица со степенями двойки
1)берем число , и отнимаем максимально возможное из таблицы, с ответом то делаем то же , и под отнимаемыми числами пишем 1 все остальное - нули
2)то же самое , только наоборот : складываем все числа , под которыми 1
После выполнения фрагмента прграммы x будет равен 67
Как я понимаю а)а=53 и б)b= 67 - значения переменных а и b соответственно
в) а=50 г) b=106
При а=53 и b=67 x=120
При а=50 и b=106 x= - 324