М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
FLINTUSHKA2007
FLINTUSHKA2007
05.01.2022 05:15 •  Информатика

Две целочисленный массив из 30 элементов . элементы массива могут принимать целые значения о 0 до 100 - учащихся выпускного класса за итоговый тестер информатике .составьте программу которая позволяет найти и вывести количество учащихся чья оценка за тест выше средней оценки в классе ))

👇
Ответ:
laconee97
laconee97
05.01.2022
Program n1;
const n=30;
var a: array[1..n] of integer;
i,k,sum: integer;
sr: real;
begin
randomize;
sum:=0;
k:=0;
for i:=1 to n do
begin
a[i]:=random(101);
write(a[i],' ');
sum:=sum+a[i];
end;
sr:=sum/n;
writeln;
for i:=1 to n do if a[i]>sr then k:=k+1;
writeln(k);
end.
4,8(75 оценок)
Открыть все ответы
Ответ:
juanabakar
juanabakar
05.01.2022

~ это пробелы.

1)

for i in range(1,10+1): //цикл от 1 до 10 включительно

print(i)

2)

for i in range(10,0,-1): //цикл от 10 до 1 включительно

print(i)

3)

for i in range(2,10+1): //цикл от 2 до 10 включительно

if i%2==0:

print(i)

4)

for i in range(1,16+1): //цикл от 1 до 16 включительно

if i%2==1:

print(i)

5)

summ=0 //переменная для хранения суммы

for i in range(1,50+1): //цикл от 1 до 50 включительно

summ+=i

print(summ)

6)

n=int(input())

summ=0

for i in range(1,n+1): //цикл от 1 до n включительно

summ+=i

print(summ)

7)

//не знаю как циклом, но вот проще

print(len(input()))

8)

n=int(input())

for i in range(len(str(n))):

print(n%10)

n//=10

Всё. Можно лучший ответ?

4,8(14 оценок)
Ответ:
TinoShtrydenberg
TinoShtrydenberg
05.01.2022
ответ на первый вопрос: 1) Скачайте и установите новые драйвера для сетевой карты или установите родные
драйвера с диска вместо определенных Windows.
2) Разрешите в используемом
Вами брандмауре (firewall) для программ, в которых Вы скачиваете файлы -
автоматически использовать необходимые порты и передавать необходимые пакеты, в
ином случае Ваш firewall может просто отключать соединение при большой нагрузке
на сеть, приняв его за атаку.
Вариант 1. Запрещение отключения сетевого адаптера для экономии
энергии. 1) Запустите Диспетчер устройств (Win + R > devmgmt.msc > ОК)
1.1) Откройте
меню Пуск
1.2) Нажмите правой кнопкой на Компьютер и выберите пункт
Свойства (Панель управления\Все элементы панели управления\Система)
1.3) Нажмите на ссылку Диспетчер устройств
2) Откройте Сетевые
адаптеры
3) Щелкните правой кнопкой мыши на Вашем сетевом адаптере и
выберите пункт Свойства
4) Перейдите на вкладку Управление
электропитанием
5) Уберите флажок Разрешить отключение этого
устройства для экономии энергии.
Вариант 2. Отключение протокола интернета версии 6 (TCP/IPv6) и отключение
разъединения в случае простоя. 1) Откройте Панель управления\Сеть и
Интернет\Сетевые подключения
2) Щелкните правой кнопкой мыши на
Подключение по локальной сети и выберите Свойства
3) Снимите
флажок Протокол интернета версии 6 (TCP/IPv6) и нажмите ОК.
Если помимо локальной сети у Вас присутствует другие типы соединений, то
продолжайте далее:
4) Щелкните правой кнопкой мыши на созданном Вами
соединении и выберите Свойства
5) Перейдите на вкладку
Параметры
6) В ниспадающем списке параметра Время простоя до
разъединения установите значение никогда
7) Перейдите на вкладку
Сеть
8) Снимите флажок Протокол интернета версии 6 (TCP/IPv6)
и нажмите ОК.
Вариант 3. Введение параметров-IP вручную. 1) Откройте Панель
управления\Сеть и Интернет\Сетевые подключения
2) Щелкните правой
кнопкой мыши на Подключение по локальной сети и выберите пункт Отключить
3) Щелкните правой кнопкой мыши на Подключение по локальной сети и выберите
пункт Включить
4) Щелкните правой кнопкой мыши на Подключение по
локальной сети и выберите Состояние
5) Нажмите на кнопку
Сведения и запишите указанные значения
6) Нажмите на кнопку
Закрыть, а затем нажмите кнопку Свойства
7) Установите курсор
на Протокол интернета версии 4 (TCP/IPv4) и нажмите кнопку
Свойства.
8) Введите записанные ранее значения параметров-IP вручную
и нажмите ОК.
Вариант 4. Настройка параметров сетевого адаптера. 1) Откройте Пуск
> Панель управления > Диспетчер устройств
2) Найдите щелкните правой кнопкой
мыши по Вашему сетевому адаптеру и выберите пункт Свойства
3)
Перейдите на вкладку Дополнительно
4) Установите значение параметра
Flow Control (Управление потоком) в положение Disabled (Выключено)
и нажмите ОК
Вариант 5. Сброс установленных значений. 1) Запустите командную
строку от имени администратора.
В строке поиска меню Пуск введите команду:
cmd и нажмите одновременно Ctrl + ?Shift +
Enter ?.
2) Введите поочередно указанные ниже команды, нажимая
после введения каждой, клавишу Enter ?.
route -f
netsh winsock reset
ipconfig /renew "Подключение по локальной сети"
Если после выполнения указанных выше действий пропадет соединение с сетью -
проверьте записи в Журнале событий: 1) Пройдите Панель управления\Все
элементы панели управления\Администрирование и откройте Просмотр
событий.
2) Слева в древовидном списке оснастки откройте Просмотр
событий (Локальный) > Журналы Windows и проверьте в каждом из подразделов:
Приложения и Система была ли описана какая-нибудь ошибка,
связанная с разрывом соединения.
Также свяжитесь со службой поддержки Вашего провайдера и проверьте
настройки.
4,5(31 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ