Program;
var a,b,c:real;
begin
readln(a,b,c);
writeln(a+b+c);
end.
Ответ: 18
Обоснование:
Var a,b,c : Integer;
Begin
a:=1257; c:=0;
while a>0 do begin
if a mod 2<>0 then b:=a mod 10; c:=c+b;
a:=a div 10; end;
Writeln(c);
end.
3. Строим таблицу истинности и определяем что функция F принимает значение 0 только при всех трёх аргументах равных единицам. Во всех остальных случаях функция принимает значение 1. Функция F эквивалентна функции.
F = ¬(X₁X₂X₃)
4.
Таблица при которой F принимает значение 0
X₁ X₂ X₃ F
0 0 0 0
0 0 1 0
0 1 0 0
1 0 0 0
1 1 0 0
К- 11+12 = 23
С- 11+19 = 30
Б- 11+2 = 13
23 = 10111
30 = 11110
13 = 1101
Сумма: 10111+11110+1101 = 10000010 = 66
23 = 27 (восьмеричная)
30 = 36
13 = 15
Сумма: 15+27+36 = 102 = 66
23 = 17(шестн.)
30 = 1E
13 = D
Сумма: 17+1E+D = 42 = 66