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

Блок-схему к этой программе(одномерные массивы)язык программирования-паскаль. программа: var a, b: array [1..15] of integer; i, max, min, j1, j2, sum, k: integer; begin write('измерения ростов всех студентов '); randomize; for i: =1 to 15 do begin a[i]: =random(50)+140; write ('а[',i,']-',a[i],'; '); end; writeln; write('рост самого высокого студента (номер): '); max : = 0; min : = 65535; k : = 0; sum : = 0; for i : = 1 to 15 do begin if (a[i] > max) then begin max : = a[i]; j1 : = i; end; if (a[i] < min) then begin min : = a[i]; j2 : = i; end; sum : = sum + a[i]; if (a[i] > 170) then begin inc(k); b[k] : = a[i]; end; end; writeln(j1); write('рост самого низкого студента (номер): '); writeln(j2); write('средний рост: '); writeln(sum/15: 4: 2); write('массив b: '); for i : = 1 to k do write('b[',i,']',b[i], '; '); readln; end. вывод: измерения ростов всех студентов а[1]-159; а[2]-183; а[3]-176; а[4]-168; а[5]-156; а[6]-165; а[7]-187; а[8]-144; а[9]-162; а[10]-164; а[11]-142; а[12]-158; а[13]-159; а[14]-163; а[15]-182; рост самого высокого студента (номер): 7 рост самого низкого студента (номер): 11 средний рост: 164.53 массив b: b[1]183; b[2]176; b[3]187; b[4]182; буду ))

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