1 2 3 4 5 6 7 | k= 0 s= 0 FOR i= 1 TO 10 IF a(i)>a( 10 ) THEN k=k+ 1 AND s=s+a(i) NEXT i PRINT(i) PRINT(s) |
Тестирование выполнено в программе QB64 ( Скачать )
1 2 3 4 5 6 7 | k= 0 s= 0 FOR i= 1 TO 10 IF a(i)>a( 10 ) THEN k=k+ 1 AND s=s+a(i) NEXT i PRINT(i) PRINT(s) |
Тестирование выполнено в программе QB64 ( Скачать )