Опубликовано 26.01.2018 по предмету Информатика от Гость

Имеется массив целых чисел размером N (задается константой). Заполнить его случайными целыми числами в заданном диапазоне (вводится с клавиатуры). Вывести его на экран.

Ответ оставил Гость

//Pascal
const N = 10;
var
  A: array [1..10] of integer;
  i: byte;
  Min, Max: integer;
begin
randomize;
  write(Введите диапазон случайных чисел: );
  readln(Min, Max);
  for i := 1 to 10 do
  begin
    A[i] := random(Max-Min+1)+Min;
    write(A[i]:4);
  end;
end.

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы