Дана линейная таблица а[1: n], n < =50. каждый элемент a[i] с четным индексом заменить значением max(a[1], a[2],…,a[i]), а с нечетным - min(a[1], a[2],…,a[i]).

Const n=10; var a: array[1..n] of integer; max,min,i: integer; begin randomize; for i: =1 to n do begin   a[i]: =random(51);   write(a[i],' ');   end; writeln; max: =a[1]; min: =a[1]; for i: =1 to n do   begin   if a[i]> max then max: =a[i];   if a[i]< min then min: =a[i];   if i mod 2 = 1 then a[i]: =min else a[i]: =max;   end; for i: =1 to n do write(a[i],' '); writeln; end. пример: 31 35 3 5 26 46 9 31 30 11 31 35 3 35 3 46 3 46 3 46

#include < iostream> int getmax(int n, int* a); int getmin(int n, int* a); int main() {   std: : cout < < "n=";   int n, i;   std: : cin > > n;   int a[n+1];   // заполнение массива   for(i = 1; i < = n; i++) {       std: : cout < < "a[" < < i < < "]=";       std: : cin > > a[i];   }   // чётные индексы   for(i = 1; i < = n; i++) {       if (i % 2 == 0) {           a[i] = getmax(i, a);       }   }   // нечётные индексы   for(i = 1; i < = n; i++) {       if (i % 2 == 1) {           a[i] = getmin(i, a);       }   }   std: : cout < < "результат: " < < '\n';   for(i = 1; i < = n; i++)       std: : cout < < a[i] < < ' ';   return 0; } int getmax(int n, int* a) {   int max = a[1];   for(int i = 1; i < = n; i++)       if (a[i] > max)           max = a[i];   return max; } int getmin(int n, int* a) {   int min = a[1];   for(int i = 1; i < = n; i++)       if (a[i] < min)           min = a[i];   return min; }

Не откажусь от и звездочек на ответ xd var a,b,c: integer; begin writeln('введите три разных числа'); readln(a,b,c); if (a> b)and(a> c) then writeln(a,' ','найбольшее'); if (b> a)and(b> c) then writeln(b,' ','найбольшее'); if (c> a)and(c> b) then writeln(c,' ','найбольшее') else writeln(', введите три разных числа'); readln; end.