Вопрос по информатике:
С клавиатуры вводятся: количество учеников в классе, затем рост каждого. Найти: 1. рост самого маленького 2. рост самого высокого. Помогите пожалуйста.
Пожаловаться
- 15.04.2016 17:20
- Информатика
- remove_red_eye 13950
- thumb_up 30
Ответы и объяснения 1
Program vb5; uses crt; var a:array [1..100] of integer; i,n,kd,km:integer; sm,sd:real; begin write ('Введите количество учащихся: '); read(n); for i:=1 to n do read(a[ i ]); for i:=1 to n do begin if a[ i ]0 then begin inc(kd); sd:=sd+a[ i ]; end; end; writeln('Средний рост мальчиков=',sm/km:0:0); writeln('Средний рост девочек=',sd/kd:0:0); end.
Пожаловаться
- 16.04.2016 07:03
- thumb_up 1
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы