Ответ:
Windows 10 or Linux
Объяснение:
Немного не понял ваш вопрос
Вопрос 9 ответ3
вопрос 10 ответ 1
вопрос 7 ответ 1
Всего оценок четыре : 2, 3, 4, 5
Оглашение оценки приводит к уменьшению неопределённости вашего знания в 4 раза, так как Вы получаете одно из четырёх возможных информационных сообщений
Var i,k : integer;
a: array[1..10] of integer;
Begin
for i := 1 to 10 do begin
a[i] := random(7) + 3;
if a[i] = 4 then k:= k + 1;
end;
writeln(k);
End.