2.33 программа. дано 10 натуральных чисел. найти их наибольший общий делитель. visual basic

ответ:

1

2

3

4

5

6

7

8

9

10

11

12

13

14

var

s : real;

c, i : integer;

begin

s: =0;

c: =0;

for i: =10 to 99 do

  if (i mod 2 =1) and (i mod 3 =0) then begin

                                        s: =s+i;

                                        inc(c);

                                        end;

s: =s/c;

writeln(s);

end.

объяснение:

ответ:

#include

#include

int main()

{

int a[10]={}; // создаем массив состоящий из 10 элементов.

int countforplus = 0; // счетчик для положительных значений.

int countforminus = 0; // счетчик для отрицательных значений.

int summ = 0; // переменная в которой будут храниться сумма   элементов массива

printf("vvedite 10 elementov massiva \n");

for (int i = 0; i < 10; i++)

{

 

  scanf_s("%d", & a[i]);

  if (a[i] < 0)

  {

  countforminus++; // если, элемент массива будет отрицательным,

      // то счетчик для отрицательных значений будет увеличиваться.

  }

  else

  {

  countforplus++; // иначе, элемент массива будет положительным,

        // то счетчик для положительных значений будет увеличиваться.

  }

  //summ += arr[i];

}

if (countforplus > countforminus) // сравниваем счетчики, если положительный больше отрицательного то

{           // находим сумму всех элементов массива

  for (int i = 0; i < 10; i++)

  {

  summ += a[i];

  }

  printf("%d \n", summ);

}

else

{

  printf("otricatelnih elemntov massiva bolshe chem polochitelnih \n");

}

system("pause");

return 0;

}

объяснение: