Navigation bar
  Print document Start Previous page
 86 of 179 
Next page End  

86
Алгоритм          
Запись
если х > 0 то      
if х > 0 then
у := х              
у = х 
иначе              
else
у := -х           
у = -х 
кесли             
end if
2. Циклический повтор:
Алгоритм         
Запись
пока х > 1 цикл    
do while х > 1
х: = х/2         
х = х/2 
кцикл              
loop
3. Вспомогательные алгоритмы (подпрограммы):
Алгоритм         
Подпрограмма
алг «у = |х|»        
mod: 'у = |х| 
нач                 
если х > 0 то      
if х > 0 then
у: = х              
у = х 
иначе              
else
у := -х            
у = -х 
все                
end if 
кон                
return
Обращение к алгоритму     
Обращение к подпрограмме 
«у = |х|»                    
gosub mod
В качестве иллюстрации приведем пример структурированного алгоритма «Галерея картинок» и
соответствующей структурированной программы:
В соответствии с этими четырьмя картинками построим три вспомогательных алгоритма рисования
отдельных картинок из «Галереи» и общий алгоритм выбора картинок в соответствии с приведенным
выше сценарием:
алг «Галерея картинок»
нач                             
алг «рисунок_треугольника» 
вывод («Список картинок:»)      
нач
вывод («1. треугольник»)           
линия (150,50)-(100,100) 
вывод («2. прямоугольник»)         
линия (150,50)-(200,100) 
Сайт создан в системе uCoz