110 likes | 210 Views
Gymnázium Vincence Makovského se sportovními třídami Nové Město na Moravě. VY_32_INOVACE_INF_RO_10 Digitální učební materiál Sada: Úvod do programování Téma: Vnořený cyklus for Autor: Mgr. Jan Rosecký Předmět: Informatika Ročník: 3 . ročník VG
E N D
Gymnázium Vincence Makovského se sportovními třídami Nové Město na Moravě VY_32_INOVACE_INF_RO_10 Digitální učební materiál Sada: Úvod do programování Téma: Vnořený cyklus for Autor: Mgr. Jan Rosecký Předmět: Informatika • Ročník: 3. ročník VG Využití: Prezentace určena k výkladu látky z úvodu do programování na gymnáziu. Anotace: Prezentace se skládá zúvodního opakování, odvození a ukázky programu k tématu vnořený cyklus fora závěrečného úkolu pro samostatnou práci. • Nové poznatky žáci získávají při společné práci s programovacím jazykem Pascal – po zadání úkolu tvoří žáci program samostatně a následně je komentováno řešení.
Úvod do programováníVnořený cyklus for Gymnázium Vincence Makovského se sportovními třídami Nové Město na Moravě
Opakování • Vytvořte program opakovani10, který za sebe napíše čísla od 1 do 10 (s mezerou):1 2 3 4 5 6 7 8 9 10
Opakování • Vytvořte program opakovani10, který za sebe napíše čísla od 1 do 10 (s mezerou):program opakovani7;var i: integer;beginfor i:=1 to 10 do write(i, ' ');end.
Opakování • Upravte program opakovani10, aby napsal čísla od 1 do zadaného čísla:Konec: 51 2 3 4 5
Opakování • Upravte program opakovani10, aby napsal čísla od 1 do zadaného čísla:program opakovani7;var a, i: integer;beginwrite('Konec: ');read(a);fori:=1 to a do write(i, ' ');end.
Opakování • Upravte program opakovani10, aby napsal tři stejné řádky s opakováním čísel:Konec: 51 2 3 4 51 2 3 4 51 2 3 4 5
Opakování • Upravte program opakovani10, aby napsal tři stejné řádky s opakováním čísel:program opakovani7;var a, i: integer;beginwrite('Konec: ');read(a);fori:=1 to a do write(i, ' ');fori:=1 to a do write(i, ' ');fori:=1 to a do write(i, ' ');end. • Je možné využít cyklu?
Vnořený cyklus • vnější cyklusřídící proměnná jj:=1 to 3 • vnitřní cyklusřídící proměnná ii:=1 to a Begin j:=1 to 3 i:=1 to a write(i, ' ') writeln End.
Opakování • Upravte program opakovani10, aby napsal tři stejné řádky s opakováním čísel:program opakovani7;var a, i, j: integer;beginwrite('Konec: ');read(a);for j:=1 to 3 dobeginfori:=1 to a do write(i, ' ');writeln end;end.
Samostatná práce – x • základní verze: vypíše vedle sebe dvacetkrát písmeno x a celkem 10 takových řádků • vylepšení: zadáme dvě přirozená čísla: kolik znaků vedle sebe a kolik řádků, úprava podle vzoru • Program na vypis znaku x • ------------------------ • Znaku na radku: 8 • Radku: 4 • ------------------------ • x xxxxxxx • x xxxxxxx • x xxxxxxx • x xxxxxxx