Ответ: k будет равно 5.
По условию, если а>0, то k присвоить значение 1, иначе присвоить значение 0, а затем прибавить 5. Перед условием указано, что а=-25, т.е. <0, значит идём по условию "иначе".
44
У нас есть цикл, который звучит как (пока s<=250). Изначально s=15. После мы запускаем данный цикл, и в каждом шагу добавляем 12 до тех пор, пока s не станет больше 250. И во время каждого шага мы к переменной n (изначальна равна 4) прибавляем 2. В конце программы мы выводим n.
Надеюсь я понятно объяснил. Если что-то не понятно - спрашивайте.
// PascalABC.NET 3.0, сборка 1088
var
n,i,max,min,s,t,k:integer;
begin
Write('Введите количество членов последовательности: ');
Read(n);
Writeln('Вводите числа через пробел');
max:=-32768; min:=32767; s:=0; k:=0;
for i:=1 to n do begin
Read(t);
if t<min then min:=t
else
if t>max then max:=t;
if t<0 then begin s:=s+t; Inc(k) end
end;
Writeln('Min=',min,', max=',max,', ср.арифм.=',s/k:0:5)
end.
<em><u>Тестовое решение:</u></em>
Введите количество членов последовательности: 7
Вводите числа через пробел
25 -6 39 -118 271 24 -15
Min=-118, max=271, ср.арифм.=-46.33333
На каждый вид мышки можно выбрать 12 видов клавиатур => 12*10=120 разных комбинаций "мышка-клавиатура"
32КБ=262144 Бит.
262144/512=512 секунд
512*5=2560 копеек.
262144/128=2048 секунд
2048*5=10240 копеек
10240-2560=7680
