K = 0
FOR i = 1 TO NPupil
IF Height(i) > 170 THEN K = K + 1 : Cand$(K) = SurName$(i)
NEXT i
IF K = 0 THEN
PRINT "В КЛАССЕ НЕТ КАНДИДАТОВ В КОМАНДУ."
ELSE
PRINT "КАНДИДАТЫ В БАСКЕТБОЛЬНУЮ КОМАНДУ :"
FOR i = 1 TO K
PRINT i ; ". " ; Cand$(i)
NEXT i
END IF
END
Пример 2.4. Для заданного x вычислить
Здесь n! = 1. 2. 3 .... n (читается как "n-факториал").
Тест
| Данные
| Результат
|
| X=1
| n=3
| 
|
| | | |
Демонстрация
Начало формы
Конец формы
