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

HELPP!!
определите среднее арифметическое чётных элементов массива A[1..10]
Написать программу в Паскаль

  1. Ответ на вопрос
    Ответ на вопрос дан iolandavalerypad353

    //Будем считать, что четные по значению

    const

     n = 10;

    var

     a: array[1..n] of integer;

     i, Sum, Count: integer;

    begin

     Sum := 0;

     Count := 0;

     Randomize;

     for i := 1 to n do

     begin

       a[i] := Random(10);

       Write(a[i], ' ');

       if a[i] mod 2 = 0 then

       begin

         Sum := Sum + a[i];

         Count := Count + 1

       end

     end;

     

     Writeln;

     Write('Среднее арифметическое ' +  

           'четных чисел: ', Sum / Count)

    end.

    1. Ответ на вопрос
      Ответ на вопрос дан fedorova111214
      Вы мой спаситель :D Спасибо!
    2. Ответ на вопрос
      Ответ на вопрос дан fedorova111214
      У меня чёт неправильно считывает среднее арифметическое, не подскажите в чем проблема?
  2. Ответ на вопрос
    Ответ на вопрос дан risaclar123

    Здесь с четными, а там просто арефмитическое...


    Var

    m:array [1..100000] of integer;

    k,i:integer;

    Begin

    k:=0;

    randomize;

    For i:=1 to 10 do

    read(m[i]);

    For i:=1 to 10 do begin

    If m[i] mod 2=0 then

    k:=k+m[i] else k:=k+0;end;

    k:=k div 10;

    writeln(k);

    end.

Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 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) их не спросили

Информация

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