Предмет: Информатика, автор: катя427

составте программу, которая заполняет массив [1..10],случайными целыми числами в диапазоне от 0 до 10 и находит сумму минимального и максимального элементов массива

Ответы

Автор ответа: rakzeee
0
const n=10;
var a:array[1..n] of integer;
i, max, min : integer;

begin

for i:=1 to n do begin
  a[i]:=random(11);
  write(a[i]);
end;
writeln;
min:=10;
max:=0;
for i:=1 to n do begin
  if a[i]<min then min:=a[i];
  if a[i]>max then max:=a[i];
end;
write('Min: ', min, ', Max: ', max);
end.



Похожие вопросы
Предмет: Қазақ тiлi, автор: Аноним

Сарин Қалқаман Айымғазыұлы 1978 ЖЫЛДЫҢ
2 қаңтарында қазіргі Шығыс Қазақстан облысы Абай ауда-
Университетінің тарих факультетін бітірген.
ны Арқат ауылында дүниеге келген. 1994 жылы орта мек-
тепті, 1998 жылы Л. Н. Гумилев атындағы Еуразия Ұлттық
Еңбек жолын мұғалім болудан бастаған. 1998 жылдан
2008 жылға дейін Қазақ Ұлттық музыка академиясында
оқытушы
болып қызмет атқарған.
Қ. Сарин — халықаралық, республикалық жыр-
мүшәйралардың жүлдегері, Халықаралық «Шабыт»
фестивалінің лауреаты, «Алтын қалам» әдеби сыйлығының жеңімпазы. «Дарын»
Мемлекеттік жастар сыйлығының лауреаты, Ол — Қазақстан Республикасы Жа-
зушылар Одағының мүшесі, «Арманымның бейнесі» атты жыр жинағының авторы.
«Жібек сезім — жүрек сөзім» деп аталатын үнтаспасын шығарған. Ел ішіне кеңінен
танылған «Қызыма», «Күзгі бақ», «Жібек сезім» және т.б. әндердің мәтінін жазған. СДЕЛАЙТЕ ПЕРЕВОД СРОЧНООО ПАЖАЛУЙСТА!!!! ДАЮ 10 БАЛЛОВ
Предмет: Математика, автор: Аноним
Предмет: Математика, автор: лиля456123