Запишите значение переменной s, полученное в результате работы следующей программы. Var s,k: integer; Begin s := 0; for k := 6 to 12 do s := s+10; writeln(s); End.
Определите, что будет напечатано в результате работы следующей программы. Var s,k: integer; Begin s := 0; for k := 8 downto 4 do s := s+7; writeln(s); End.
Определите, что будет напечатано в результате работы следующей программы. Var k,i: integer; Begin k := 4; For i := 1 to 3 do k := 2*k + i; Writeln(k); End.
Определите, что будет напечатано в результате работы следующей программы. Var s,k: integer; Begin s:=0; a:=1; for k:=1 to 4 do begin s:=s+a; a:=a*2; end; write(s); End.
Определите, что будет напечатано в результате работы следующей программы. var s, k:integer; begin s := 0; for k := 2 to 12 do s := s + 11; writeln (s); end.
Определите, что будет напечатано в результате работы следующей программы. Var u,i: integer; Begin u := 26; For i := 1 to 5 do u := u – i; Writeln(u); End.
Определите, что будет напечатано в результате работы следующей программы. var s, k:integer; begin s := 0 ; for k:= 4 to 11 do s := s + k ; writeln (s); end.
Определите, что будет напечатано в результате работы следующей программы. var s, n: integer; begin s := 1; for n := 3 to 8 do s := s * 2; write(s); end.
Определите, что будет напечатано в результате работы следующей программы. Var у,і: integer; Begin У := 0; For і := 1 to 3 do у := у + 4*і; Writeln(у); End.
Определите, что будет напечатано в результате работы следующей программы. Var s,і:integer; Begin s := 3; For і := 2 to 5 do s := s + 2* і; Writeln (s) ; End.