Регистрация
lyudagrigoreva2
26.08.2022 15:15
Информатика
Есть ответ 👍

Задать целочисленную таблицу , состоящую из различных чисел интервала [-. найти разность наибольшего и наименьшего элементов и указать номер наибольшего элемента.

295
481
Посмотреть ответы 2

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

Saeg
Saeg
4,6(84 оценок)
Var   a,b,min,max,i,j,k: longint; begin   readln(n);   min: =maxlongint;   max: =-min;   for i: =1 to n do   begin   read(a);   if a> max then   begin      max: =a;     k: =i;   end;   if a< min then min: =a;   end;   writeln(max-min); writeln(k); end.
никита3330
никита3330
4,5(9 оценок)

Водительские права можно получить, если тебе исполнится 18 лет.

Объяснение:

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