Пишу задание вторым номером, поэтому постараюсь на качество.
Нам нужно найти сначала сумму всего роста, потом поделить его на общее количество учеников. Потом сопоставить каждый элемент со средним числом и высчитать количество высоких учеников.
Будет это выглядить так:
uses crt; //Если используете паскаль ABC, это строка нужна для удобства
Var a: array [1..25] of real; i,otvet: integer; h,s:real;
//Объявляем переменные. Массив,среднее число и суммарный рост - любые числа. Сам ответ - целые числа
Begin
For i:=1 to 25 do begin
Writeln('Введите рост ученика номер ',i); readln(a[i]);
//Здесь мы вводим рост с клавиатуры
end;
For i:=1 to 25 do
s:=s+a[i];
//находим суммарный рост всех учеников
h:=s/25;
// делим на их количество. Теперь переменная h - это средний рост
For i:=1 to 25 do
if a[i]>h then otvet:=otvet+1;
// А здесь проверяем каждый элемет массива. Если он выше значения среднего роста, мы прибавляем единицу к переменной "otvet". Там мы считаем количество высоких уч.
Writeln('Средний рост в классе равен ',h);
Writeln('Количество высоких учеников в классе равно ',otvet);
//вывод данных
end.
program test;
var a, b: integer;
begin
write('Enter A: ');
readln(a);
write('Enter B: ');
readln(b);
writeln('Area = ', a*b);
readln;
end.
1.Устройство компьютера 1) Питание 2) Процессор 3) Видеокарта 4) Память 5) Материнская плата 6) Винчестер 7) Корпус 8) Дисковод
2)
1. Питание- Вторичный источник электропитания, предназначенный для снабжения узлов компьютера электроэнергией постоянного тока путём преобразования сетевого напряжения до требуемых значений.
2. Процессор- это основной элемент компьютера, с помощью которого обрабатывается информация, находящийся как в свободной памяти, так и в памяти других устройств.
3. Видеокарта- это устройство которое хранит содержимое памяти компьютера.
4. Память- это часть вычислительной машины, или среда для хранения данных компьютера.
5. Материнская плата- это печатная плата,являющаяся основой построения модульного устройства.
6.Винчестер- это жёсткий диск, который является основным накопителем данных в большинстве компьютерах
7. Корпус- это системный блок, наполненный аппаратами обеспечения для создания компьютера.
8. Дисковод- Устройство компьютера,позволяющее осуществить чтение и запись информации на съёмном диске.