Вэвм поступают результаты соревнований по плаванию для трёх спортсменов. составьте программу, которая выбирает лучший результат и выводит его на экран с сообщением, что это результат победителя заплыва. решить через if.

program sorevnovaniya; var a,b,c: integer; begin writeln ('введите результаты соревнований'); readln (a,b,c); if (a< b) and (c< b) then writeln (b, '-', 'результат',' ','победителя',' ', 'заплыва'); if (b< c) and (a< c) then writeln (c, '-', 'результат',' ','победителя',' ', 'заплыва'); if (b< a) and (c< a) then writeln (a, '-', 'результат',' ','победителя',' ', 'заплыва'); end.

//visual c++ 2012 #include < iostream> using namespace std; int main(){   int ma[2][2];   int temp;   temp=0;   for(int i=0; i< 2; i++)   for(int j=0; j< 2; j++)     cin> > ma[i][j];   cout< < "first array: "< < endl;     for (int i=0; i< 2; i++){       for (int j=0; j< 2; j++)       cout< < ma[i][j]< < "\t";       cout< < endl;       }   for(int i=0; i< 2; i++){   temp=ma[i][0];   ma[i][0]=ma[i][1];   ma[i][1]=temp;   }   cout< < "final array"< < endl;     for (int i=0; i< 2; i++){       for (int j=0; j< 2; j++)       cout< < ma[i][j]< < "\t";       cout< < endl;       }   cin.get();   cin.get();   return 0; }

Вы массив объявили с именем  ar, а пытаетесь его использовать с именем а исправленный код выглядит так: var   ar: array[1..10]of integer;   a, c, i, n: integer; begin read(n);   for i : = 1 to n do   begin       read(ar[i]);       if i = 1 then           c : = ar[i];       if ar[i] > c then           c : = ar[i];   end;   writeln(c); end.   вариант №2 program max; const n = 10; var   ar: array[1..10]of integer;   a, c, i: integer; begin   for i : = 1 to n do   begin       read(ar[i]);       if i = 1 then           c : = ar[i];       if ar[i] > c then           c : = ar[i];   end;   writeln(c); end.