profile

Опубликовано 5 лет назад по предмету Информатика от sssanek

 Даны натуральное число n и последовательность целых чисел а1, а2,…,аn.. Определить количество тех членов последовательности, которые нечетны . Найти сумму членов последовательности, кратных 11. Составить блок-схему алгоритма, написать программу.

  1. Ответ
    Ответ дан chiferr

    var a:array[1..1000] of longint;

     kol, s, i, n : longint;

    begin

     

    readln(n);

     

    for i:=1 to n do read(a[i]);

     

    s := 0;

    kol := 0;

    for i:=1 to n do 

    begin

      if (a[i] mod 11 = 0) then s := s + a[i];  // summa elementov

      if (a[i] mod 2 = 1) then kol := kol + a[i];  // kolichestvo nechetnyx

    end;

     

    writeln (kol, ' ', s);

    end;

     

     

     

    после //  нужно удалить ... сорри, что нет блок схемы

Войдите или зарегистрируйтесь, чтобы добавить ответ или свой вопрос на сайт


Другие вопросы
Хаааа
Математика - 4 недели назад

150+150=?

Хаааа
Математика - 4 недели назад

150+150=?

скляр
Биология - 1 месяц назад

Ген днк включает 300 пар нуклеотидов. какова длина, молекулярная масса гена и сколько аминокислот закодировано в нем

скляр
Биология - 1 месяц назад

Ген днк включает 300 пар нуклеотидов. какова длина, молекулярная масса гена и сколько аминокислот закодировано в нем

Дашка
Русский язык - 1 месяц назад

Подчеркните грамматическую основу. определите вид дополнения (прямое или косвенное), подпишите их 1) я отправил сестре телеграмму с поздравлением 2) учёные доказали существование жизни в космосе 3) он не знал никаких радостей, кроме чтения книг. 4) и поныне славятся у нас на севере замечательные русские умельцы.5) после тёплой ясной погоды наступило ненастье.6) подруга на станции купила новый иллюстрированный журналы и свежий мягкий хлеб. 7)хохлатые курицы ищут в сене мошек да букашек.8) и туман, и непогоду осень поздняя несёт


Информация

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