Новенький в классе мальчик, придя домой, начал вспоминать имена девочек из класса, сидящих на первых - id420904920221210 от Amalya15 10.12.2022 10:47

Question

Информатика: Новенький в классе мальчик, придя домой, начал вспоминать имена девочек из класса, сидящих на первых четырех партах в ряду около окна. он точно помнит, что: 1.на каждой парте сидит только одна девочка 2.имена девочек оля, света. лена и таня 3.одна из девочек носит косички, другая – хвостик, третья – распущенные волосы, а четвертая коротко подстрижена 4.оля сидит не на первой парте 5.лена сидит дальше от доски, чем света 6.света сидит на парте перед олей 7.таня не сидит на соседней с леной парте

Amalya15 · Accepted Answer

Const
maxN = 100; // Максимальное кол-во элементов массива
var
n, i: longint;
middle, sum, sum2: real; // Может быть нецелым числом
a: array[1..maxN] of real;
begin
write('Введите количество элементов массива: ');
readln(n);
sum := 0; // Считаем сумму всех элементов, чтобы найти среднее арифметическое
write('Введите элементы массива через пробел: ');
for i := 1 to n do begin
    read(a[i]);
    sum := sum + a[i];
end;
middle := sum / n; // Вычисляем среднее арифметическое
writeln('Среднее арифметическое = ', middle);
sum2 := 0; // Считаем сумму элеметов, меньших среднего арифметического
for i := 1 to n do
   if a[i] < middle then
   sum2 := sum2 + a[i];
writeln('Сумма элементов, меньших среднего арифметического = ', sum2);
end.

MOGZ ответил