Уводни део часа : 1. Шта су циклуси ? 2. Када користимо циклусе ? ------------------------------------------------------------------------------------------------------------------- Главни део часа : За организацију циклуса користи се наредба for…do. Синтаксни дијаграм ове наредбе приказан је на слици : У алгоритмима се ова наредба приказује на следећи начин : Наредба која се понавља представља део for наредбе и може бити проста или сложена. Крајња вредност бројачке променљиве i је такође променљива. Почетна и крајња вредност бројачке променљиве у for наредби може бити константа, променљива или израз. Пример 1. Написати програм који штампа првих 100 природних бројева. PROGRAM PROBA( INPUT, OUTPUT ); { STAMPANJE PRVIH 100 PRIRODNIH BROJEVA } VAR i : INTEGER; BEGIN FOR i:= 1 TO 100 DO WRITELN( i : 3 ) END. Пример 2. Написати програм који штампа табелу природних бројева од 11 до 31, њихових квадрата и кубова. PROGRAM TEST( INPUT, OUTPUT ); { TABELA PRIRODNIH BROJEVA, KVADRATI, KUBOVI } VAR i, x, y : INTEGER; BEGIN FOR i:=11 TO 31 DO BEGIN x:=SQR( i ); y:= SQR ( i ) * i; WRITELN( i, x, y ) END; END. Пример 3. Написати програм који n пута штампа исту реч. PROGRAM TEST1( INPUT, OUTPUT ); { STAMPANJE ISTE RECI n PUTA } VAR i, n : INTEGER; BEGIN WRITELN( ' UNETI BROJ ' ); READLN(n); FOR i:= 1 TO n DO WRITELN('REC') END. Одговорити на питања : 1. Написати програм који учитава n бројева и штампа њихов максимум. 2. Написати програм који штампа збир реципрочних вредности квадрата двоцифрених бројева. 3. Написати програм за одређивање суме простих двоцифрених бројева. 4. Написати програм којим се израчунава сума реципрочних вредности првих n природних бројева. 5. Написати програм који учитава природан број n и штампа његове чиниоце. |