1)
<span>z = 0
</span><span>считаем количество нечётных элементов массива
</span>15 (нечётное) z = 1
<span>17 </span> (нечётное) z = 2
<span>24</span> (чётное) z = 2<span>
18</span> (чётное) z = 2<span>
13 </span> (нечётное) z = 3<span>
28</span> (чётное) z = 3<span>
18</span> (чётное) z = 3<span>
95</span> (нечётное) z = 4<span>
19 </span> (нечётное) z = 5<span>
17 </span> (нечётное) z = 6
<span>Ответ: 6
2)
</span><span>s = 24 (первому элементу массива)
сравниваем со следующими элементами массива, если элемент больше s присваиваем s значение большего элемента
7 > 24 (нет)
</span>14 > 24 (нет)
<span>8</span> > 24 (нет)<span>
56</span> > 24 (да) s = 56
12 > 56 (нет)<span>
48</span> > 56 (нет)<span>
25</span> > 56 (нет)<span>
19</span> > 56 (нет)<span>
17</span> > 56 (нет)
Ответ: 56
3/256 Мбайта = 1024*3/256 Кбайт = 12 Кбайт = 12*1024 байт = 12*1024*8 бит
Память для одного символа = 12*1024*8 / 6144 = 16 бит
Мощность алфавита = 2^16 = 16384
Program prog;
Uses crt;
var m: integer;
label l1;
Begin clrscr;
l1: write('Введите номер месяца = ');
readln(m);
case m of 1,3,5,7,8,10,12: writeln('31');
4,6,9,11: writeln('30');
2: writeln('28/29');
else
begin
writeln('Непривильный номер месяца');
writeln;
goto l1;
end;
end;
readln;
End.