Дана последовательность из N вещественных чисел. Переменной t присвоить значение true, если в последовательности нет нулевых элементов. Написать программу для Pascal ABC и блок-схему. Студенческий уровень.

А можешь через for написать?

А смысл?

Через for придётся использовать оператор break. Здесь же цикл завершается, как только вводится нулевой элемент (т.к. вещественный тип представлен в компьютере приближенно, мы сравниваем не с нулём, а с 0.001 (это число может задать сам пользователь)). Ну а так могу через for написать, но решение будет неэффективное.

В лс