Var M: array[1..15] of integer;
i, count: integer;
begin
for i := 1 to 15 do begin
M[i] := random(15);
write(M[i]:3);
if(M[i] mod 2 = 0) then inc(count);
end;
writeln(#10, 'Кол-во четных элементов: ', count);
<span>end.</span>
1
а) число 258 не поместится в одном байте.
б) 79(10) = 01001111(2)
в) 149(10) = 10010<span>101(2)</span>
<span>Ветвление-это команда алгоритма, в которой делается выбор, выполнять или не выполнять какую-нибудь группу команд в зависимости от условий.
</span>
Блок-схема-распространенный тип схем, описывающих алгоритмы или процессы, в которых отдельные шаги изображаются в виде блоков различной формы, соединенных между собой линиями, указывающими направление последовательности.<span>
</span>
2
1 - не соответствует второму правилу
3 - 19 не может быть суммой однозначных чисел
4 - 21 аналогично
1)Проверь контакты видеокарты.
2)Проверь биос
3)Чекни через специальную программу комп на вируса