FreeCDZ

Программирование циклических алгоритмов

×

Задание 1

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на языке программирования Pascal. var n, s: integer; begin s := 1; for n := 2 to 5 do s := s * 3; write(s); end.

×

Задание 2

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на языке программирования Pascal. var s,k: integer; begin s := 5; for k := 5 to 9 do s := s+7; writeln(s); end.

×

Задание 3

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на языке программирования Pascal. var n, s: integer; begin n := 1; s := 0; while n <= 80 do begin s := s + 20; n := n * 3 end; write(s) end.

×

Задание 4

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на языке программирования Pascal. var s, n: integer; begin s := 0; n := 75; while s + n < 150 do begin s := s + 15; n := n - 5 end; writeln(n) end.

×

Задание 5

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на языке программирования Pascal. var s,k: integer; begin s := 0; for k := 1 to 7 do s := s+5; writeln(s); end.