Задано количество хоккеистов N и для каждого указаны количество забитых шайб и штрафное время, заработанное в течение матча. Необходимо определить, какое количество шайб забил самый корректный игрок, т.е. игрок с минимальным штрафным временем

Категория: Basic
2011-08-21 10:09:58
code: #basic
  1. CLS
  2. INPUT "ВВЕДИТЕ КОЛИЧЕСТВО ХОККЕИСТОВ";N
  3. PRINT "ВВЕДИТЕ КОЛИЧЕСТВО ШАЙБ, ЗАБИТЫХ КАЖДЫМ ХОККЕИСТОМ"
  4. DIM SHAIB(N)
  5. FOR I=1 TO N
  6.   LOCATE 4,I*8
  7.   INPUT SHAIB(I-1)
  8. NEXT I
  9. PRINT
  10. PRINT "ВВЕДИТЕ ШТРАФНОЕ ВРЕМЯ ДЛЯ КАЖДОГО ИГРОКА"
  11. DIM SHTRAF(N)
  12. FOR I=1 TO N
  13.   LOCATE 8,I*8
  14.   INPUT SHTRAF(I-1)
  15. NEXT I
  16. PRINT
  17. J=0
  18. FOR I=1 TO N-1
  19.   IF SHTRAF(I)<SHTRAF(J) THEN J=I
  20. NEXT I
  21. PRINT "САМЫЙ КОРРЕКТНЫЙ ИГРОК ЗАБИЛ ";SHAIB(J);" ШАЙБ"
  22. END
Поделиться:

Похожие статьи:

теги: студенты