var
mas:array[1..3] of integer;
i,min:integer;
begin
for i:=1 to 3 do
begin
min:=maxint;
writeln ( 'Введите возраст ',i,'-ого участника');
readln (mas[i]);
if mas[i]<min then min:=mas[i];
end;
writeln (min);
end.
1. дом.bmp. потому что это графический файл, а все остальные текстовые.
2. лето.Jpg, это графический файл, потому что к графическим файлам относятся: bmp. jpg. gif.
Символ "П" в кодировке Hex будет "CF" ,
в кодировке Dec будет "207" , в
кодировке HTML будет " ∏ "
Это к первому вопросу:
Program n1;
Uses Crt;
Var
a: array[1..10] of integer;
i,k,max,m:integer;
Begin
for i:=1 to 10 do begin
a[i]:=random(11)+10;
write(a[i]:4);
end;
writeln;
max:=a[1];
for i:=2 to 10 do
if (max<a[i]) then max:=a[i];
k:=0;
for i:=1 to 10 do
if (max=a[i]) then k:=k+1;
writeln('Kol-vo elementov ravnih max lementu massiva: ',k);
<span>End.
Второй вопрос просто-напросто не понял.</span>
Способ без использования архиватора:
t = I / v
t = (80 * 2^23) / 2^22 = 160 с
Способ с использованием архиватора:
Найдём 70 процентов от исходника.
0.7 * 80 * 2^23 = 56 * 2^23
(56 * 2^23) / 2^22 = 112с
На сжатие требуется 23 секунды, на распаковку еще 12, 122 + 23 + 12 = 147
Ответ: А147