В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Максим5955
Максим5955
26.06.2021 04:58 •  Информатика

Напишите функцию sisseastumine(), при запуске которой происходит заполнение двух списков: абитуриенты[],  []. Количество элементов в списках ограничивается пользователем (либо оговаривается сколько людей надо опросить, либо в режиме online- данные вносятся пока не закончатся данные о людях). После заполнения списков появляется меню с выбором действий:
•  Узнать список поступивших в вуз людей(количество поступивших указывает пользователь);
• Отобразить в алфавитном порядке список людей и их  ;
• Найти n людей с худшими результатами;
• Найти средний поступивших ;
• Свой вариант.
Для описания действий создайте необходимые функции​

Показать ответ
Ответ:
Аминишка
Аминишка
12.12.2022 09:10
Program pr;
uses crt; 
Var a,b,c:integer; 

Begin   
Write('Введите 1-ю сторону: '); Readln(a);   
Write('Введите 2-ю сторону: '); Readln(b);   
Write('Введите 3-ю сторону: '); Readln(c); 
  
{Проверка на существование треугольника} 
if ((a+b)>c) and ((a+c)>b) and ((b+c)>a)   then        
     Begin                     
          if ((a=b)or (b=c) or (a=c)) then               
                Writeln('Треугольник равнобедренный');                       
 
         if ((a=b) and (b=c)) then               
            Writeln('Треугольник равносторонний')                 
         else Writeln('Треугольник разносторонний');           
  
        if ((a*a+b*b = c*c) or (a*a+c*c = b*b) or (b*b+c*c = a*a))    then
             Writeln('Треугольник прямоугольный');                      
    end   
   else       Writeln('Треугольник нельзя построить');    

Readln(); 
END.
0,0(0 оценок)
Ответ:
АРинаArinah
АРинаArinah
29.01.2023 21:22

Объяснение:

Приведите примеры ситуаций, в которых информация:

собирается - опрос журналистом людей для статьи в газете

обрабатывается - решение учеником задачи

упрощается - тбъяснение учителем материала урока

создается - придумывание журналистом статьи (как ее написать, что в ней написать и т.д)

запоминается - выучивание учеником стиха

измеряется - рассчитывание программистом объема, который займет написанная им программа

копируется - списывание учеником домашнего задания у одноклассника

передается - распространение слухов внутри класса или школы (один рассказал, другой передал и так далее)

принимается - ученики слушают, что им рассказывает учитель на уроке

разрушается - отклонение написанной статьи журналиста

делится на части - работа с текстом на уроке русского языка (вставить запятые, буквы, например)

ищется - поиск материала для написания сообщения, доклада на какой-либо урок

Надеюсь, смогла

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота