profile


Опубликовано 4 года назад по предмету Информатика от skaras1996

Кто, что может сделать.... помогите.... !!!ПОЖАЛУЙСТА!!!

  1. Ответ
    Ответ дан mefody66
    1) Может
    2) б)
    3) а) 6, б) 12, с) 6, d) нет
    4) В массив на место A[5] вписывают 0, а все элементы больше 5-го сдвигают вправо.
    5) а)
    6) с)
    7) а)
    8) for i:=1 to 15 do if i mod 5 = 0 then write (A[i], ' ');
    9) k:=0;
    for i:=1 to 8 do if A[i]<=10 then k:=k+1;
    write (k);
    10) var A: array [1..6] of integer
    var i, S: integer
    BEGIN
    for i:=1 to 6 do read (A[i]);
    S:=A[1]+A[2];
    for i:=2 to 5 do if (A[i]+A[i+1] mod 2 = 1) and (A[i]+A[i+1] < S) then S:=A[i]+A[i+1];
    write (S);
    END.
    11) Программа ищет максимальный элемент массива и выдат число 7.
    12) Каждый элемент массива превращается в сумму двух соседних элемента.
    Выдаст массив -1 5  7  3  1


    1. Ответ
      Ответ дан skaras1996
      СПАСИБО ОГРОМНОЕ!!!!!!!!!!!!!!!!!

Другие вопросы