Циклические программы


Презентация изнутри:

Слайд 0

Циклические программы Устный счет Язык программирования Pascal ABC


Слайд 1

var k,i: integer; begin k:=4; for i:=1 to 4 do k:=k+1; writeln (k); end.


Слайд 2

var n,i,s: integer; begin s:=0; for i:=2 to 5 do s:=s+i; writeln (s); end.


Слайд 3

var x,y,i: integer; begin y:=2; for i:=10 downto 5 do y:=y+i; writeln (y); end.


Слайд 4

var n,i,s: integer; begin s:=5; for i:=3 to 7 do begin s:=s+i; s:=s*2; end; writeln (s); end.


×

HTML:





Ссылка: