Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Лёша / 7
.pdf
Ход работы:
Начало |
Ввод j |
k=1 |
k<=j |
Да |
Вводим |
x[k] |
k++ |
l=0; |
|
k=1 |
|
k<=j |
|
|
Да |
Нет |
|
x[k]>0 |
|
|
Да |
l++ |
1 |
|
1
geom=1
k=1
|
|
Да |
|
|
|
Нет |
|
|
|
|||
k<=j |
|
x[k]>0 |
|
k++ |
||||||||
|
|
|
|
|
|
|
||||||
|
|
|
|
|||||||||
|
|
|
|
|
|
|||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Нет |
|
|
|
|
Да |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
geom=geom*pow(x[k],1.0/l) |
|
|
|
||||||
k=1; |
|
|
|
|
||||||||
|
|
|
|
|
|
|
|
|
|
|
||
min=x[1] |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
k=1 |
Нет |
k<j |
|
|
|
||
|
|
|
|
|
|
|
|
|
Да |
|
Нет |
k<j |
k++ |
|
|
|
k++ |
||
|
|
|
||
|
|
Да |
|
|
2 |
|
|
|
|
|
|
|
|
|
|
|
Нет |
|
Нет |
|
|
x[k]==min |
|
min>=x[k] |
|
|
Да |
|
Да |
|
|
x[k]=geom |
|
min=x[k] |
2
k=1
Нет
k<=j
Да
Конец |
Вывод x[k] |
|
k++
Соседние файлы в папке Лёша