Var a,b,c,x:integer;
begin
readln (a);
readln (b);
readln (c);
x:=a*b*c;
writeln (x);
end.
Это программа определяет минимальный элемент в массиве
Элементов всего 8
Изначально считается минимальным первый элемент т. е 3
Далее идет проверка в
Первый элемент проверяется со вторым ( 3 < 8) да один раз выполняет
ся , минимальным считается значение массива равное 3
Следующая проверка ( 3< 7) да втрой раз выполняется
Запоминается 3 и т.д .
3 будет меньше 8, 7,9, 4, 10, ( Итого пять раз)
Предпоследнее действие 3 сравнивается с 2 ( условие ложно) не выполняется( не подсчитывается)
И последний проход 3< 12 ( да, истинно) подсчитывается
Итого 6 раз
1. n=10; i=3;
2. 3<=10 - да а=3*2+3=9; i=3+1=4;
3. 4<=10 - да а=4*2+3=11; i=4+1=5;
4. 5<=10 - да а=5*2+3=13; i=5+1=6;
5. 6<=10 - да а=6*2+3=15; i=6+1=7;
6. 7<=10 - да а=7*2+3=17; i=7+1=8;
7. 8<=10 - да а=8*2+3=19; i=8+1=9;
8. 9<=10 - да а=9*2+3=21; i=9+1=10;
9. 10<=10 - да а=10*2+3=23; i=10+1=11;
10. 11<=10 - нет;
Ответ: 23