Найти максимальную оценку и соответствующее имя - QBasic

Узнай цену своей работы

Формулировка задачи:

два массива имен и оценок найти максимальную оценку и соответствуеешее имя.

Решение задачи: «Найти максимальную оценку и соответствующее имя»

textual
Листинг программы
  1. CLS
  2. DATA "abc ","bcd ","cde ","def ","efg "
  3. DATA  31,    21,    77,    14,    55
  4. n = 5
  5. DIM a(n) AS STRING
  6. DIM b(n)
  7.  
  8. FOR i = 1 TO n
  9.    READ a(i)
  10.    PRINT a(i);
  11. NEXT
  12. PRINT : PRINT
  13.  
  14. FOR i = 1 TO n
  15.    READ b(i)
  16.    PRINT b(i);
  17. NEXT
  18. PRINT : PRINT
  19.  
  20. max = b(1)
  21. im$ = a(1)
  22.  
  23. FOR i = 1 TO n
  24.    IF max < b(i) THEN
  25.       max = b(i)
  26.       im$ = a(i)
  27.    END IF
  28. NEXT
  29.  
  30. PRINT "MAX ="; max; im$
  31. END

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 3.9 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы