danilkarev201
24.07.2020 01:59

Александра сергеевна давно мечтает создать рейтинг классов по "продвинутости" по информатике и икт по итогам четверти. александре сергеевне напишите программу, которая будет показывать топ-5 самых умных классов (исходя из среднего четвертных оценок), учитывая, что каждый год количество классов и учеников в классе меняется. любые расчеты должны произвоциться в программе. интересное оформление программы .

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ДОМАШКАФИЗИКА
13.12.2022 03:49

Проводная связь — вид электросвязи; связь, при которой сообщения передаются по проводам посредством электрических сигналов. Противоположно беспроводной связи.

По проводной связи сообщения могут вводиться голосом и приниматься на слух (телефонная связь), в виде условных знаков или букв и цифр (телеграфная связь и передача данных), в виде неподвижных изображений — фотографий, рисунков, чертежей (факсимильная связь) или речи абонентов (видеотелефон) и подвижных (телевизионных) изображений[1].

Беспроводная вычислительная сеть — вычислительная сеть, основанная на беспроводном (без использования кабельной проводки) принципе, полностью соответствующая стандартам для обычных проводных сетей (например, Ethernet). В качестве носителя информации в таких сетях могут выступать радиоволны СВЧ-диапазона.

0,0(0 оценок)
Ответ:
yaroslavaaf
20.10.2021 06:09
Замечание. Так как количество вводимых чисел заранее не известно, то откроем бесконечный цикл со всегда верным условием True, но как только будет введено число 0, остановим цикл командой break.

Программа:

program z;
var k,s,x:integer;
begin
k:=0;              {начальное значение количества двузначных чисел}
s:=0;              {начальное значение суммы двузначных чисел}
while True do  {открываем бесконечный цикл}
begin
readln(x);        {вводим число х}
if x=0 then break;  {если введенное число равно 0, то остановить цикл}
if (x>9)and(x<100) then  {если число двузначное, т.е. от 10 до 99} 
    begin 
    k:=k+1;         {количество увеличиваем на 1}
    s:=s+x;         {увеличиваем предыдущее значение суммы на число х}
    end;
end;
if k=0 then writeln('NO')  {если двузначных чисел не было, то вывод NO}
   else writeln(s/k);          {иначе вывод ср.арифметического}
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота