🗊Презентация Ветвления и циклы на Паскале

Нажмите для полного просмотра!
Ветвления и циклы на Паскале, слайд №1Ветвления и циклы на Паскале, слайд №2Ветвления и циклы на Паскале, слайд №3Ветвления и циклы на Паскале, слайд №4Ветвления и циклы на Паскале, слайд №5Ветвления и циклы на Паскале, слайд №6Ветвления и циклы на Паскале, слайд №7Ветвления и циклы на Паскале, слайд №8Ветвления и циклы на Паскале, слайд №9Ветвления и циклы на Паскале, слайд №10Ветвления и циклы на Паскале, слайд №11

Вы можете ознакомиться и скачать презентацию на тему Ветвления и циклы на Паскале. Доклад-сообщение содержит 11 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации


Слайд 1






Ветвления 
и циклы на Паскале
Описание слайда:
Ветвления и циклы на Паскале

Слайд 2





В программировании различают 3 типа цикла:
В программировании различают 3 типа цикла:
« Пока » ( с предусловием );
« До » ( с постусловием );
« Для » ( с параметром ).
Описание слайда:
В программировании различают 3 типа цикла: В программировании различают 3 типа цикла: « Пока » ( с предусловием ); « До » ( с постусловием ); « Для » ( с параметром ).

Слайд 3





Цикл с параметром ( «Для» )
Описание слайда:
Цикл с параметром ( «Для» )

Слайд 4





Пример 1.
program pr2;
uses graphabc;
var i,a:integer;
begin
floodfill(0,0,81);
for i:=15 downto 1 do
begin
a:=i*10;
setBrushcolor(300*a+i);
fillrect(320-a,240-a,320+a,240+a);
end;end.
Описание слайда:
Пример 1. program pr2; uses graphabc; var i,a:integer; begin floodfill(0,0,81); for i:=15 downto 1 do begin a:=i*10; setBrushcolor(300*a+i); fillrect(320-a,240-a,320+a,240+a); end;end.

Слайд 5





Цикл с предусловием ( «Пока» )
Описание слайда:
Цикл с предусловием ( «Пока» )

Слайд 6





Пример 2.
program pr3;
uses graphabc;
var i,a:integer;
begin
floodfill(0,0,81);
i:=15;
 while i>=1 do
begin
a:=i*10;
setBrushcolor(300*a+i);
fillrect(320-a,240-a,320+a,240+a);
i:=i-1;
end;end.
Описание слайда:
Пример 2. program pr3; uses graphabc; var i,a:integer; begin floodfill(0,0,81); i:=15; while i>=1 do begin a:=i*10; setBrushcolor(300*a+i); fillrect(320-a,240-a,320+a,240+a); i:=i-1; end;end.

Слайд 7





Цикл с постусловием ( «До» )
Описание слайда:
Цикл с постусловием ( «До» )

Слайд 8





program pr2;
program pr2;
uses graphabc;
var i,a:integer;
begin
floodfill(0,0,81);
i:=15;
repeat
begin
a:=i*10;
setBrushcolor(300*a+i);
fillrect(320-a,240-a,320+a,240+a);
i:=i-1;
end;
until i<=1;
end.
Описание слайда:
program pr2; program pr2; uses graphabc; var i,a:integer; begin floodfill(0,0,81); i:=15; repeat begin a:=i*10; setBrushcolor(300*a+i); fillrect(320-a,240-a,320+a,240+a); i:=i-1; end; until i<=1; end.

Слайд 9


Ветвления и циклы на Паскале, слайд №9
Описание слайда:

Слайд 10


Ветвления и циклы на Паскале, слайд №10
Описание слайда:

Слайд 11





Пример 4.
program pr1;
uses graphabc;
var i,a:integer;
begin
for i:=15 downto 1 do
begin
floodfill(0,0,clgreen);
a:=i*10;
if i mod 2=0 then
setBrushcolor(clblue)
else setBrushcolor(clred) ;
fillrect(320-a,240-a,320+a,240+a);
end;end.
Описание слайда:
Пример 4. program pr1; uses graphabc; var i,a:integer; begin for i:=15 downto 1 do begin floodfill(0,0,clgreen); a:=i*10; if i mod 2=0 then setBrushcolor(clblue) else setBrushcolor(clred) ; fillrect(320-a,240-a,320+a,240+a); end;end.



Похожие презентации
Mypresentation.ru
Загрузить презентацию