Вадим - Футбол и физика.
Саша - Баскетбол и информатика.
Агата - Хоккей и математика.
Валя - Волейбол и химия.
//PascalABC.Net 3.2
begin
var a: array of integer;
setLength (a, readinteger('Введите размерность массива: '));
var count:=0;
for var i:=0 to length(a)-1 do a[i]:=readinteger ('Введите элемент: ');
for var i:=1 to length(a)-1 do if (a[i-1]*a[i])<0 then count+=1;
write ('Кол-во раз: ', count);
end.
Ответ:
В большинстве случаев доклады и их планы в презентациях не используются.
Чаще всего на них показывают наглядные графики и 2-3 предложения к ним.
Я считаю, что вариант 4 будет правильным.
6 бит на символ так как 2 в степени 6 = 64;
50 байтов = 400 бит;
2000 символов = 12000 бит;
время = 12000/400 = 30 секунд