• Вопрос по информатике:

    Дан целочисленный массив из 10 элементов. Элементы массива могут принимать целые значения от -10000 до 10000 включительно. Опишите на одном из языков программирования алгоритм, позволяющий найти и вывести количество пар элемента массива, в которых сумма элементов делится на 2, но не делится на 4. В данной задаче под парой подразумевается два соседних элемента массива.
    Программа Паскаль.

    • Автор:

      wrigley
  • program raf105;

    var

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

     x,i,c: integer;

    begin

    writeln('Заполните массив:');

    for i:=1 to 10 do

     readln(a[i]);

    for i:=1 to 10-1 do

     if ((a[i]+a[i+1]) mod 2 = 0) and ((a[i]+a[i+1]) mod 4 <> 0)

       then c+= 1;

    writeln('Вывод: ',c);

    end.

    PascalABC 3.4.2
    • Отвечал:

      barbie2z0d

    Ответов нет, но ты это испарвиш!