dimoni86
?>

Где ошибка var x, y, i, s, d, n, p: integer; begin randomize; for i: =1 to 10 do begin x: =random(8)+2; y: =random(8)+2; p: =0; n: =0; writeln ('сколько будет ', x, '*', y, '='); read (s); if s=x*y then p: =p+1; begin writeln (': ) правильно'); d: =d+1; end; if s< > x*y then n: =n+1; begin writeln (': ( неправильно, ', x, '*', y, '=', x*y); end; writeln('количество правильных ответов: ', p); writeln('количество неправильных ответов: ', n); if (d=10) or (d=9) then writeln ('ваша оценка за тест 5'); if (d=8) or (d=7) then writeln ('4'); if (d=6) or (d=5) then writeln ('3'); if (d=4) or (d=3) or (d=2) or (d=1) or (d=0) then writeln ('2'); end; end.

Информатика

Ответы

oknacrow

там куча ошибок, нате, разбирайтесь


Где ошибка var x,y,i,s,d,n,p: integer; begin randomize; for i: =1 to 10 do begin x: =random(8)+2; y:
antilopa001
1. После получения сообщения о номере пути был сделан выбор 1 из 8, т.е. неопределенность информации о номере пути уменьшилась в 8 раз. Логарифм по основанию 2 от 8 равен 3, следовательно мы получили 3 бита информации.
2. Если сообщение несет 4 бита информации, то неопределенность наших знаний о предмете сообщения уменьшилась в 2^4=16 раз. Если бы в коробке были одноцветные карандаши, неопределенность уменьшилась бы в 2^6=64 раза и мы бы получили 0 байт информации (если все карандаши белые, сообщение о вынутом белом карандаше не несет ничего нового). В нашем случае получено на 2 байта больше, следовательно белых карандашей 2^2=4 штуки.
natakrechko
- Сеть может иметь уязвимости в безопасности, что может позволить злоумышленникам получить несанкционированный доступ к информации и причинить материальный, моральный и прочий ущерб владельцу сети.
- Наличие сети требует привлечение клалифицированных кадров для администрирования и настройки ресурсов сети, что требует финансовых затрат и трудо затрат
- Плохая непродуманная коммутация сети может повлечь в будущем проблемы с расширением сети для подключения новых устройств и пользователей
- В зависимости от топологии сети и архитекруты постоения , сеть может потребовать дополнительных вычислительных мощностей для решения поставленных задач, иначе возможны провалы в производительности сервера и рабочих станций и даже полной их остановки
- По сути нет универсальной защиты и всегда можно найти слобое место и получить в итоге вирусную эпидемию в данной сети со всеми последсвиями, что практически невозможно когда компьютеры изолированны

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Где ошибка var x, y, i, s, d, n, p: integer; begin randomize; for i: =1 to 10 do begin x: =random(8)+2; y: =random(8)+2; p: =0; n: =0; writeln ('сколько будет ', x, '*', y, '='); read (s); if s=x*y then p: =p+1; begin writeln (': ) правильно'); d: =d+1; end; if s< > x*y then n: =n+1; begin writeln (': ( неправильно, ', x, '*', y, '=', x*y); end; writeln('количество правильных ответов: ', p); writeln('количество неправильных ответов: ', n); if (d=10) or (d=9) then writeln ('ваша оценка за тест 5'); if (d=8) or (d=7) then writeln ('4'); if (d=6) or (d=5) then writeln ('3'); if (d=4) or (d=3) or (d=2) or (d=1) or (d=0) then writeln ('2'); end; end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kirycha-2000719
DodokhodzhaevVladimirovich
rytikovabs
Владимирович_Намик59
Aleks0091
abahtina582
Рощак_Ольга573
Vetroff-11
Олег1105
Nikolaevna382
Михайлович Гуртовая929
borisowaew
Nikishina
igor8809337
Анатольевна824