ВУЗ:
Составители:
Рубрика:
39
Здесь <I> – параметр (индекс) цикла, являющийся переменной поряд-
кового типа; <START> – начальное значение параметра цикла;
<FINISCH> – конечное значение параметра цикла; < ОПЕРАТОР > – вы-
полняемый оператор.
Если в первом варианте значение <START> больше значения
<FINISCH>, а во втором варианте – <START> больше <FINISCH>, то
оператор цикла FOR не выполняется ни разу.
В цикле FOR нельзя задавать шаг, отличный от 1.
После выхода из цикла его параметр становится неопределенным,
кроме случая, когда выход из него был осуществлен с помощью оператора
безусловного перехода GOTO или стандартной процедуры BREAK.
Пример 4.1. Составить программу для вычисления среднеарифмети-
ческого размера деталей в партии. Алгоритм программы представлен в
приложении Г.4.
PROGRAM SRED_RAZM;
USES CRT;
VAR I, N: INTEGER;
SUM, SR, R: REAL;
BEGIN
CLRSCR;
WRITE (‘ВВЕДИТЕ КОЛИЧЕСТВО ДЕТАЛЕЙ В ПАРТИИ:’);
READLN (N);
SUM:= 0;
FOR I:= 1 TO N DO
BEGIN
WRITE (‘ВВЕДИТЕ РАЗМЕР’,I,’-ОЙ ДЕТАЛИ В ММ:’);
READLN (R);
SUM:= SUM+R
END;
SR:=SUM/N;
WRITE(‘СРЕДНЕАРИФМЕТИЧЕСКИЙ РАЗМЕР ДЕТАЛЕЙ’);
Страницы
- « первая
- ‹ предыдущая
- …
- 38
- 39
- 40
- 41
- 42
- …
- следующая ›
- последняя »
