Есть ответ 👍

Заполнить массив случайными числами от -10 до 50. найти разность между максимальным и минимальным элементами массива

277
391
Посмотреть ответы 2

Ответы на вопрос:


паскаль абц -

const n=45;

var

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

  ras,i,x,j: integer;

 

begin

for i: =1 to n do

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

x: =a[1]; // икс - самое маленькое

j: =a[1]; // джей - самое большое

for i: =2 to n do

begin

  if x > a[i] then

    x: =a[i]; // если икс меньше следующего значения, то присваеваем ему икс

  if j < a[i] then

    j: =a[i]; // по аналогии, только если джей больше

end;

ras: =j-x;

writeln('разность между числами ', j,' и ',x,' равна ', ras);

end.


Шесть раз выполнится тело цикла в данном алгоритме

Популярно: Информатика