1 2 3 4 5 6 7 8 | DIM a( 20 ) FOR i= 1 TO 20 INPUT a(i) NEXT i FOR i= 1 TO 20 IF a(i)= 0 THEN PRINT i NEXT END |
Тестирование выполнено в программе QB64 ( Скачать )
1 2 3 4 5 6 7 8 | DIM a( 20 ) FOR i= 1 TO 20 INPUT a(i) NEXT i FOR i= 1 TO 20 IF a(i)= 0 THEN PRINT i NEXT END |
Тестирование выполнено в программе QB64 ( Скачать )