Закачка файла винтика заняла 20 минут если бы не шпунтик со свойм файликом. Четыре минуты он качал с нормальной скоростью, а потом с половинной
Файл: 4+16*2=36 мин
Размер (Объём) файла шпунтика 20% больше
Он качал бы 20 мин.Начал качать после винтика, скорость уменьшается вдвое
48 мин. Но через 32 минут, винтик закончил скачивание и скорость умножилась на 2
48-32=16 еще 8 минут
<span>Разница в "4 МИНУТАХ"</span>
Правильный вариант 3
Здесь мы объявляем массив из 8 элементов и присваиваем элементу с индексом 0 значение 0
Далее цикл идет, заполнения массива. Отметим, что цикл начинается с 1, т.е. со второго элемента(индексация в массивах с 0). Так же, массив до 8.
Т.е. мы заполним: 1,2,3,4,5,6,7 элементы. А 0 заполнили ранее. + формула совпадает с исходной.
Program next;
var a,b,c,i,g,o:integer;
begin
g:=0;
b:= 0;
writeln('Сколько учахщихся?');readln(a);
for i=0 to a do
writeln('Средний бал у ',i,' ученика:');readln(c);
g:= g+c;
end;
o:= g/a;
writeln('Средний балл учащихся',o);
readln;
end.
Я вот тоже Вышел порешать =).
var p: array [1..1000] of record
slovo:string;
k:integer;
end;
N,i,j,max:integer;
c:char;
a:array [97..122] of integer;
BEGIN
max:=0;
readln(N);
for i:=1 to N do
begin
p[i].slovo:='';
repeat
read(c);
p[i].slovo:=p[i].slovo+c
until c=' ';
readln(p[i].k);
for j:=1 to length(p[i].slovo) do
if (ord(p[i].slovo[j])>=97) and (ord(p[i].slovo[j])<=122) then
a[ord(p[i].slovo[j])]:=a[ord(p[i].slovo[j])]+p[i].k;
end;
for j:=97 to 122 do
if a[j]>max then
max:=a[j];
write(max);
end.
Program gt;
var x1,x2,y1,y2:integer;
begin
readln(x1,y1,x2,y2);
if ((abs(x1-x2)<=1)and(abs(y1-y2)<=1))then writeln('YES')else
writeln('NO');
end.