profile
Размещено 5 лет назад по предмету Информатика от Maks12121212

Напишите программу, которая находит среднее значение четных и нечетных чисел из одного файла и записывает ответ в другой файл ( из файла in.txt в out.txt) Паскаль

Пример
6 - (кол-во чисел)
1 2 3 4 5 6
Среднее значение чётных ___
Среднее значение нечётных ___

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    // PascalABC.NET 3.1, сборка 1230 от 27.04.2016
    begin
      var s:=ReadLines('in.txt').ToArray;
      var n:=StrToInt(s[0]);
      var a:=s[1].ToWords.Select(e->StrToInt(e)).ToArray;
      var f:=OpenWrite('out.txt');
      Writeln(f,n,' - (кол-во чисел)');
      foreach var e in a do Write(f,e,' '); Writeln(f);
      Writeln(f,'Среднее значение четных ',
        a.Where(x->x.IsEven).Average);
      Writeln(f,'Среднее значение нечетных ',
        a.Where(x->x.IsOdd).Average);
      f.Close
    end.

    Файлы in.txt и out.txt находятся во вложении.

    Содержимое файла out.txt:
    15 - (кол-во чисел)
    -22 49 33 47 -10 -1 20 -18 2 21 2 -25 21 -47 -36
    Среднее значение четных -8.85714285714286
    Среднее значение нечетных 12.25
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.