Program gg; var a,b,c,d,e,max: integer; begin writeln('введите пять целых чисел'); read(a,b,c,d,e); if (a> =b) and (a> =c) and (a> =d) and (a> =e) then begin max: =a; end else begin if (b> =a) and (b> =c) and (b> =d) and (b> =e) then begin max: =b; end else begin if (c> =b) and (c> =a) and (c> =d) and (c> =e) then begin max: =c; end else begin if (d> =b) and (d> =c) and (d> =a) and (d> =e) then begin max: =a; end else begin max: =e; end; writeln('наибольшее число ',max); end. где ошибка?

{ужасный код, куча абсолютно бесполезных begin end, которые не стоят друг под другом, что только загромождает код! ошибка в том, что вы не форматируете код, и не видите, какой end закрывает какой begin. уберите их из кода и получите: program gg; var   a, b, c, d, e, max: integer; begin   writeln('введите пять целых чисел');   read(a, b, c, d, e);   if (a > = b) and (a > = c) and (a > = d) and (a > = e) then       max : = a   else   if (b > = a) and (b > = c) and (b > = d) and (b > = e) then       max : = b   else   if (c > = b) and (c > = a) and (c > = d) and (c > = e) then       max : = c   else   if (d > = b) and (d > = c) and (d > = a) and (d > = e) then       max : = a   else       max : = e;   writeln('наибольшее число ', max); end. форматирование кода:     if (****) then         begin                    оператор1;                       оператор2;               end    else           begin                  оператор1;                   оператор2;           end; } включите мозг и напишите нормальный код program gg; var   a, b, c, d, e, max: integer; begin   writeln('введите пять целых чисел');   read(a, b, c, d, e);   max: =a;   if b > max then max: =b;   if c > max then max: =c;   if d > max then max: =d;   if e > max then max: =e;   writeln(max); end. // pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! begin var (a,b,c): =readinteger3; var (d,e): = readinteger2; writeln(max(a,max(b,max(c,max(d,; end.

решение столбиком прикреплю файлом

1.   70.51₈ + 43.26₈ = 133.77₈

проверка:

70.51₈ = 56.640625₁₀

43.26₈ = 35.34375₁₀

133.77₈ = 91.984375₁₀

56.640625₁₀+35.34375₁₀=91,984375₁₀

2. a7a.bd₁₆ − 172.ef₁₆ = 907.ce₁₆

проверка:

a7a.bd₁₆ = 2682.73828125₁₀

172.ef₁₆ = 370.93359375₁₀

907.ce₁₆ = 2311.8046875₁₀

2682.73828125₁₀ - 370.93359375₁₀ = 2311,8046875₁₀