• 28 November 2013
    • Химия
    • Автор: Amaxasla4

    Дан одномерный массив целых чисел М(12), определить количество и сумму нечетных чисел в массиве. Вывести результат и массив М.

    Срочно нужна помощь!!!!!!


    • 28 November 2013
    • Ответ оставил: mrkuzka

    Uses crt;
    const n=12;
    var m:array[1..n] of integer;
    k,s,i:integer;
    begin
    randomize;
    for i:=1 to n do
    begin
    m[i]:=random(9)+1;
    writeln(m[i]);
    if m[i] mod 2<>0 then begin inc(k); s:=s+m[i]; end;
    end;
    writeln;
    writeln(k);
    writeln(s);
    end.


    Оцените ответ

    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету...

Последние и похожие вопросы