заполнить массив случайными числами от -10 до 50. найти разность между максимальным и минимальным элементами массива
Ответы
Ответ дал:
0
паскаль абц -
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.
Ответ дал:
0
обосновать, почему единица?
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад