Получить ответ

Лучший ответ по мнению автора

Максим 5.0 11 отзывов Рейтинг: 7 133 Общаться в чате var   A:array[1..1000] of integer; {1000 — максимальное число спортсменов}   i, N, max1,max2:integer; {N — число спортсменов, max1 — число очков для золотой медали, max2 — число очков для серебрянной медали} begin   N:=10; {допустим, было 10 спортсменов}   for i:=1 to 10 do readln(A[i]); {вводим 10 результатов}   max1:=a[1]; max2:=a[1];   for i:=1 to 10 do begin     if max1<a[i] then max1:=a[i];     if (max2<a[i]) and (max2<max1) then max2:=a[i];   end;  {после этой нехитрой комбинации переменная max2 будет содержать число очков серебрянных медалистов}   write('Василий набрал ',max2,' очков'); end. Добрый день. Меня заинтересовал ваш ответ "var   A:array[1..1000] of integer; {1000 — максимальное число спортсменов}   i, N, max1,max2:integ..." на вопрос http://www.liveexpert.org/topic/view/67455-. Можно с вами обсудить этот ответ? Обсудить с экспертом 29.04.11 Лучший ответ по мнению автора

Другие ответы

Константин Уточните, пожалуйста, условие 23.03.11

Артеьмев Илья Андреевич 0 отзывов Рейтинг: 345 Общаться в чате входные данные 5 4 3 3 1 2 ответ3 Добрый день. Меня заинтересовал ваш ответ "входные данные5 4 3 3 1 2 ответ3" на вопрос http://www.liveexpert.org/topic/view/67455-. Можно с вами обсудить этот ответ? Обсудить с экспертом 23.03.11

Еva 4.9 399 отзывов Рейтинг: 121 998 6-й в Учебе и науке Общаться в чате Читать ответы

Похожие вопросы