Разветвления - второй из типичных разновидностей алгоритмов. Разветвления начинается с определенного условия. Если это условие выполняется, происходит одно действие (или набор действий); если нет - другая. Примером такого алгоритма может служить, например, общение контроллера с пассажиром автобуса: если пассажир предъявил билет, надо поблагодарить пассажиру за оплаченный проезд, если нет - оштрафовать. Для программирования разветвления в языке Паскаль используется одна из конструкций if - then и if - then - else (англ. If - "если", then - "то", else - "иначе"). Складанне-сложение
Const n=10; var a:array[1..n] of integer; i,s,min:integer; begin writeln('Исходный массив:'); for i:=1 to n do begin a[i]:=random(21)-10; write(a[i]:4); end; writeln; s:=0; min:=a[1]; for i:=1 to n do begin if a[i]>0 then s:=s+a[i]; if a[i]<min then min:=a[i]; end; writeln('s = ',s,' min = ',min); for i:=1 to n do if a[i]>0 then a[i]:=s else if a[i]<0 then a[i]:=a[i]-min; writeln('Измененный массив:'); for i:=1 to n do write(a[i]:4); writeln; end.
Все сильнее и сильнее высокие технологии входят в нашу жизнь. Компьютеризированные телескопы, множество гаджетов- это не воспаленная фантазия писателей, а наше время. Одной из таких "фантастических чуд"- роботы. Роботы все чаще и чаще заменяют человека на множествах работ, где "железному другу" проще, чем человеку. Посредством алгоритмов роботы решают самые запутанные задачи. К примеру, роботизированный станок используется на множествах фабрик, от производства конфет и до заводов по сборке автомобилей. Почти каждая деталь сделана специальным станком, подчиняющийся алгоритмам и командам, созданных человеком!
Складанне-сложение