В римской системе из левого большего числа вычитается правое меньшее.
XLCDM
X- 10
L-50
C-100
D-500
M-1000
Получается из M-D-C-L-X= 1000-500-100-50-10=340
Ответ- 340
По формуле узнаем информационный вес одного символа N=2^i, где N-мощность алфавита, подставив и решив прлучим что инф вес одного символа будет равен 5 бит, умножим 5 бит на 256 и получим 1280-вес одной страницы в битах. Разделим всю это на 8, получим 160-вес страницы в байтах, потом умножим на 64 и получим 10240-вес всего документа в байтах, ну и разделим на 1024, получим 10 кбайт. Ответ: 10
Текст плохо форматируется, поэтому скину файлом.
Может так:
Vara:array[1..5]of integer;
a1,a2,a3,a4,a5,max:integer;
function f(a,b:integer):integer;
begin
if a>b then result:=a else result:=b;
end;
begin
a1:=random(10);
a2:=random(10);
a3:=random(10);
a4:=random(10);
a5:=random(10);
writeln(a1);
writeln(a2);
writeln(a3);
writeln(a4);
writeln(a5);
writeln;
max:=f(a1,a2);
max:=f(max,a3);
max:=f(max,a4);
max:=f(max,a5);
writeln('max=',max);
<span>end.</span>
var
v,a,b,c: real;
begin
writeln ('введи длину, ширину и высоту коробки');
read (a,b,c);
v:=a*b*c;
writeln ('объем коробки равен', v);
end.