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

Категория: Basic
2012-03-11 16:36:32

Результат игр по футболу хранятся в массиве. Каждые три последовательных элемента массива содержат соответственно номер игры, количество забитых мячей и количество пропущенных мячей.

code: #basic
INPUT "vvedite kolichestvo igr ", n
DIM a(n * 3)
FOR i = 1 TO n
a(i * 3 - 2) = i
PRINT "v "; i; " igre"
INPUT "zabito ", a(i * 3 - 1)
INPUT "propusheno ", a(i * 3)
NEXT
PRINT
PRINT "massiv"
FOR i = 1 TO n * 3
PRINT a(i);
NEXT
FOR i = 1 TO n
IF ABS(a(i * 3 - 1) - a(i * 3)) > 3 THEN k = k + 1
NEXT
PRINT "takih igr="; k

автор: кот Бегемот

Поделиться:

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

теги: массив, студенты, qbasic