• нужно сформировать линейный массив по формуле, вывод должен быть в строку и столбик.
    Найти количество элементов некратных 7.
    Количество отрицательных элементов.
    Удалить 3 элемент и вставить 99 на 5 место

Ответы 4

  • формулу любую
    • Автор:

      garrido
    • 6 лет назад
    • 0
  • random сойдет?)
    • Автор:

      leon30
    • 6 лет назад
    • 0
  • честно не знаю, но все равно спасибо)
    • Автор:

      juliana90
    • 6 лет назад
    • 0
  • constmaxn = 100;typemyarr = array [1..maxn] of longint;vara: myarr;i, n, k7, kotr: longint;beginwriteln('Введите количество элементов массива:');readln(n);for i := 1 to n do begina[i] := random(100); //i * i div a[i - 1];if (a[i] mod 7 = 0) theninc(k7);if (a[i] < 0) theninc(kotr);end;write(a[i], ' ');for i := 3 to 5 doa[i] := a[i + 1];a[5] := 99;for i := 1 to n dowriteln(a[i]);end.И где, собственно, формула?
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years