Задать вопрос
16 августа, 03:26

Хей, хелп, сомбади Одномерный массив из 10 элементов заполнить случайным образом числами от - 5 до 5. Заменить все отрицательные элементы массива 0, а положительные увеличить на 2. Вывести на экран монитора первоначальный и преобразованный массивы в строчку.

+5
Ответы (1)
  1. 16 августа, 05:32
    0
    Var

    a, b: array [0 ... 10] of longint;

    q:longint;

    begin

    for q:=1 to 10 do

    begin

    a[q]:=random (11) - 5;

    if a[q]>0 then b[q]:=a[q]+2;

    write (a[q],' ') ; end;

    writeln () ;

    for q:=1 to 10 do

    write (b[q],' ') ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Хей, хелп, сомбади Одномерный массив из 10 элементов заполнить случайным образом числами от - 5 до 5. Заменить все отрицательные элементы ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы