10*7-12= 58
58+2=60
60/12=5
5*5=25
а - 25
b - 60
c - 5
x - 58
8 бит - 1 байт бла бла бла бла
условий не написано, поэтому просто решим.
а) 1012 + 112 = 1124
б) 10012 - 112 = 9900
в) 112 • 102= 11424
Function Max(a,b:real):real;
begin
if a>b then Max:=a
else Max:=b
end;
var
a,b,c,d,e,m:real;
i:integer;
begin
Writeln('Введите 5 чисел: ');
Read(a,b,c,d,e);
m:=Max(a,b);
m:=Max(m,c);
m:=Max(m,d);
m:=Max(m,e);
Writeln('Максимум: ',m)
end.
<u>Пример</u>
Введите 5 чисел:
2.3 4 -5.16 0 0.087
Максимум: 4