1) 01101110
2) 11111100 (первый разряд слева знаковый; 1 - отрицательное число, 0 – положительное)
3) В постфиксной форме записи сначала операнды, потом действие между ними. Выполняем действия последовательно:
1. 16 4 +, т.е. 16 + 4 = 20 >> 20 7 2 - 1 - * 12 +
2. 20 5 1 - * 12 +
3. 20 4 * 12 +
4. 80 12 +
5. 80 + 12 = 92 (ответ)
4) Количество путей из А в Т:
А – 1
Б = А = 1
Д = А = 1
В = А + Б = 2
Г = А + Д = 2
Е = Б + В + Г + Д = 1 + 2 + 2 + 1 = 6
К = Е = 6
Л = К + Е = 6 + 6 = 12
М = Л + К = 12 + 6 = 18
Н = К + М + Л = 6 + 18 + 12 = 36
П = Н = 36
Р = Н = 36
Т = П + Н + Р = 36 + 36 + 36 = 108
Ответ: 108
===== PascalABC.NET =====
begin
ArrRandom(10, -99, 99)
.Println
.Where(p -> p.IsOdd)
.Sum
.Println
end.
Var i, a, b, c: integer;
begin
readln(a, b);
for i := a to b do c := c + i*i;
writeln(c);
<span>end.
Работает)</span>
Ответ:
Программа на паскале:
const
MAX_N = 20001;
var
a: array[1 ... MAX_N] of integer;
n, i, j, p, maxp: integer;
begin
i : = 1;
read (a[i]) ;
while a[i] 0 do
begin
inc (i) ;
read (a[i]) ;
end;
n : = i - 1;
maxp : = 0;
for i : = 1 to n do
for j : = 1 to n do
begin
p : = a[i] * a[j];
if (p mod 26 = 0) and (p > maxp) then
maxp : = p;
end;
if maxp = 0 then writeln ('Not found')
else writeln (maxp) ;
Объяснение: