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

    Дано 3 массива A,B,C, состоящие из 10 элементов. Присвоить массиву D среднее арифметическое каждого элемента этих 3 массивов. Массивы A,B,C вводятся вручную.
    Так же желательно когда допустим я ввел не верные данные то я должен ввести их заново не перезапуская программу. Это вроде через repeat и until делается.

    • Автор:

      jarvis93
  • Да, забыл сверху var поставить. Справишься?

    • Отвечал:

      liliakrause
    • 0

    Ответ:

    Begin

    For i:=1 to 10 do

    Read(a[i]);

    For i:=1 to 10 do

    Read(b[i]);

    For i:=1 to 10 do

    Read(c[i]);

    For i:=1 to 10 do

    d[i]:=(a[i]+b[i]+c[i])/3;

    End.

    Извини, но на "желательно" не было времени, это было бы слишком долго.

    • Отвечал:

      nicodemoneal
    • 0

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

Еще 4 ненужных тебе вопроса, но это важно для поиска