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

Вмассиве найдите минимальный и максимаксимальный элементы среди элементов с чётными индексами . в паскале

118
241
Посмотреть ответы 2

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

overlord14
overlord14
4,4(63 оценок)
Pascalabc.net версия 3.3. сборка 1583 (25.11.2017) var    n: integer;   a: array[1..100] of integer; begin   write('введите размер массива (n< 100): '); readln(n);   var max: =0;   var min: =101;   for var i: =1 to n do   begin   a[i]: =random(0,100);   write(a[i],' ');   if i mod 2=0 then     if a[i]> max then max: =a[i]     else     if a[i]< min then min: =a[i];   end;   writeln;   writeln('максимальный - ',max);   writeln('минимальный - ',min);   readln; end. пример: введите размер массива (n< 100): 10 15 32 90 97 35 62 52 37 5 63  максимальный - 97 минимальный - 37
linakabak12345
linakabak12345
4,4(6 оценок)
Растровые:   gif,  jpeg,  bmp,  psd. векторные:   cdr,  dxf,  wmf,  dfx.

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