FreeCDZ

Анализ программ с циклическим алгоритмом for. PascalABC

×

Задание 1

Запишите значение переменной u, полученное в результате работы следующей программы: var u, i: integer; begin u := 26; for i := 5 downto 1 do u := u - i; writeln(u); end.

×

Задание 2

Какое целое значение s надо ввести, чтобы в результате выполнения программы было выведено целое число 55. var s,k: integer; begin read(s ); for k := 9 downto 6 do s := s + 12; writeln(s); end.

×

Задание 3

Запишите значение переменной f, полученное в результате работы следующей программы: var f, n: integer; begin f := 20; for n := 5 downto 1 do f := f + n; writeln(f); end.

×

Задание 4

Установите соответствия между переменными s, L и их значениям , напечатанными в результате выполнения следующей программы: var s,k, L: integer; begin L := 0; s := 1; for k := 3 downto 0 do begin L:= L + 1; s := s * 3; end; writeln(s); writeln(L); end.

×

Задание 5

Сколько раз выполнится оператор цикла в следующей программе: var n1, n2, i ,k : integer; begin n1:=3; n2:=5; k:= 0; for i:= n1 downto n2 do k := k+1; writeln(k) end.

×

Задание 6

Запишите значение переменной t, полученное в результате работы следующей программы: var t, i: integer; begin t := 2; for i := 1 to 4 do t := t * i; writeln(t); end.

×

Задание 7

Запишите значение переменной k, полученное в результате работы следующей программы: var k, i: integer; begin k := 2; for i := 0 to 2 do k := i + 3 * k; writeln(k); end.

×

Задание 8

Запишите значение переменной k, полученное в результате работы следующей программы: var k, i: integer; begin k := 4; for i := 1 to 3 do k := i + 2 * k; writeln(k); end.

×

Задание 9

Запишите значение переменной k, которое должна получить процедура read(k), чтобы в результате работы следующей программы было получено число 86. var k, i: integer; begin read(k); for i := 0 to 2 do k := i + 3 * k; writeln(k); end.

×

Задание 10

Запишите значение переменной s, полученное в результате работы следующей программы: var s,i: integer; begin s := 3; for i := 2 to 5 do s := s + 2*i; writeln(s); end.