1 2 3 4 5 6 7 8 | INPUT "N= ", N DIM A(N) FOR I = 1 TO N INPUT A(I) NEXT FOR I = 1 TO N IF A(I) > I THEN PRINT A(I); NEXT |
Тестирование выполнено в программе QB64 ( Скачать )
1 2 3 4 5 6 7 8 | INPUT "N= ", N DIM A(N) FOR I = 1 TO N INPUT A(I) NEXT FOR I = 1 TO N IF A(I) > I THEN PRINT A(I); NEXT |
Тестирование выполнено в программе QB64 ( Скачать )