Вмассиве хранится информация о максимальной скорости каждой из 40 марок легковых авто. найти скорость 2 самых быстрых машин

#include < iostream> int main() { int a[40] = { 150, 156, 176, 164, 158, 170, 168, 163, 166, 175, 150, 156, 176, 164, 258, 270, 268, 263, 266, 275,  150, 156, 176, 164, 358, 370, 368, 363, 366, 375,  150, 156, 176, 164, 458, 470, 468, 463, 466, 475, }; int s[2] = { 0 }; for (int i = 0; i < 40; ++i){     if (a[s[0]] < a[i]) s[0] = i; else     if (a[s[1]] < a[i]) s[1] = i; } std: : cout < < "car#1: " < < s[0] < < "car#2: " < < s[1]; return 0; }

программа на паскале:

program a1;

var i, j : integer;

      s : real;

      a: array [1..5, 1..6] of real;

      b: array [1..6] of real;

begin

  for i: =1 to 5 do

    for j: =1 to 6 do

        readln(a[i,j]);

  for j: =1 to 6 do

    begin

        s: =0;

        for : =1 to 5 do

            s: =s+a[i,j];

        b[j]: =s

    end;

  write ('полученный массив в: ');

  for j: =1 to d do

    write(b[j]);

  readln

end. 

имя       возраст     занятие

оля         13             пение

петя         14           баскетбол

вася         13             хоккей

катя         15             танцы

коля         11         баскетбол

серёжа     11           футбол