profile
Опубликовано 5 лет назад по предмету Информатика от vivalaviva12

Программа заполнения массива из 100 чисел случайными значениями из диапазоа от -20 до 20.  (паскаль)

 

  1. Ответ
    Ответ дан Tlalok

    const

      n = 100;

    var

      a:array[1..100] of integer;

      i:integer;

    begin

      randomize;

      for i := 1 to n do

      begin

        a[i] := random(41) - 20;

        write(a[i], ' ');

      end;

      writeln;

    end.

Самые новые вопросы