cernovarmechta
?>

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

Информатика

Ответы

baranovaas

ответ:

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.

объяснение:

braigon974

ответ:

#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;

}

объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

2.33 программа. дано 10 натуральных чисел. найти их наибольший общий делитель. visual basic
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

optikaleks7
azarov8906
lovel24
ksenyabobrovich7214
Vasilii1891
лукашова940
VladimirovnaBugrova
a800000
Маргарита595
pbttehnology
Plyushchik_Nikita
schernov
Нина1449
ktripoleva294
kseniay2006548