Задать вопрос
15 мая, 08:27

Одномерный массив из 6 элементов с номерами от 4 до 9 заполнить случайным образом числами от 1 до 10. Все элементы массива, значения которых меньше 5, уменьшить на единицу. Вывести на экран монитора первоначальный и преобразованный массивы в строчку.

+2
Ответы (1)
  1. 15 мая, 10:18
    0
    Var

    i:integer;

    a:array[4 ... 9]of integer;

    begin

    writeln ('Исходный массив:');

    for i:=4 to 9 do

    begin

    a[i]:=random (1,10);

    write (a[i]:4);

    end;

    for i:=4 to 9 do

    if a[i]<5 then a[i]:=a[i]-1;

    writeln;

    writeln ('Преобразованный массив:');

    for i:=4 to 9 do

    write (a[i]:4);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Одномерный массив из 6 элементов с номерами от 4 до 9 заполнить случайным образом числами от 1 до 10. Все элементы массива, значения ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы