Администраторы группы

  • Аватар

Олимпиада по информатике. Готовимся побеждать!

Открытая группа активность: 4 мес., 4 нед. назад

Группа для тех, кто намеревается побеждать на районных и региональных олимпиадах по информатике.
Здесь можно будет найти олимпиадные задания, задачи повышенной сложности, обсудить оптимальные алгоритмы решений
Памятка для участников олимпиады

Сайт Информатикс – регистрирууемся, решаем, продвигаемся в рейтинге

«Пары чисел» (задание на массивы и циклы) (записей: 7)

← Форум группы   Все форумы
  • Аватар prepod - 7 г., 10 мес. назад:

    Вводится N целых неотрицательных чисел
    Условия:
    2<=N<=100
    числа < 100
    Определить, сколько среди чисел есть пар одинаковых чисел, стоящих рядом.

    Например:
    Введено: 1 2 3 3 2 Ответ: 1
    Введено: 1 1 1 1 Ответ: 3

    Пояснение
    Задача на массивы и применение оператора цикла.

    Courseware Assignment Link

  • Аватар prepod - 7 г., 10 мес. назад:

    Объявляете массив максимально необходимой длины (100 ячеек в нашем случае). Ну а в задаче используете столько ячеек, сколько потребуется в данном конкретном случае.

    type
    mas = array [1..100] of byte;
    var
    M: mas;
    i,N; byte;
    BEGIN
    writeln (’Введите число элементов массива (N<100)');
    readln (N);
    for i:=1 to N do readln (M[i]);
    END.
    

    Как это в С++ напишется?

  • Аватар Tco_music - 7 г., 10 мес. назад:
    #include <iostream>
    
    using namespace std;
    
    int main()
    {
       int array[100];
       int N, var;
    
       cout << "Vvedite chislo elemta massiva(N<100)";
       cin >> N;
    
       for(int i = 0; i < N; i++)
       {
           cin >> var;
           array[i] = var;
       }
    
       return 0;
    }
    
  • Аватар prepod - 7 г., 10 мес. назад:

    Принято:) Позволил себе поправить тег – заменил [/code] на [/c]
    Осталось добавить цикл подсчета пар чисел

  • Аватар Tco_music - 7 г., 10 мес. назад:
    #include <iostream>
    
    using namespace std;
    
    int main()
    {
        int array[100];
        int N, var, result = 0;
    
        cout << "Vvedite chislo elenta massiva< ot 2 do 100>: ";
        cin >> N;
    
        for (int i = 0; i < N; i++)
        {
            cout << "Vvedite chislo: ";
            cin >> var;
    
            array[i] = var;
    
        }
    
        for (int j = 1; j < N; j++)
        {
            if (array[j] == array[j-1])
            result++;
        }
    
        cout << endl << "Resultat: " << result << endl;
        return 0;
    }
    
  • Аватар prepod - 7 г., 10 мес. назад:

    Ну и в переводе на pascal :)

    type
      mas = array [1..100] of byte;
    var
      M: mas;
      i,N,result; byte;
    BEGIN
      writeln (’Введите число элементов массива (N<100)');
      readln (N);
      for i:=1 to N do readln (M[i]);
      result:=0;
      for i:=1 to N-1 do if M[i]=M[i+1] then result:=result+1;
      writeln ('Число пар чисел =',result);
    END.
    
  • Аватар prepod - 7 г., 10 мес. назад:

    Может, кто-нибудь еще на php напишет? Или еще на каком-нибудь языке?