Question

Задание 3. Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык Бейсик Паскаль алг нач цел s, n s := 5 нц для n от 2 до 4 DNM n, s AS INTEGER s = 5 FOR n = 2 TO 4 s = s + (n-1) NEXT n PRINT s Var s, n: integer; Begin s := 5; For n := 2 to 4 do s := s + (n-1);s := s + (n-1) кц вывод s кон Writeln(s); End. Задание 4. Запишите значение переменной y, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык Бейсик Паскаль алг нач цел s, n s := 2 нц для n от 2 до 5 s := s*2 + n кц вывод s кон DNM n, s AS INTEGER s = 2 FOR n = 2 TO 5 s = s*2 + n NEXT n PRINT s Var s, n: integer; Begin s := 2; For n := 2 to 5 do s := s*2 + n; Writeln(s); End. Задание 5. Запишите значение переменной t, полученное в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык Бейсик Паскаль алг нач цел t,i t := 1 нц для i от 1 до 4 t := t * i кц вывод t кон DIM i,t AS INTEGER t = 1 FOR i = 1 TO 4 t = t * i NEXT i PRINT t Var t,i: integer; Begin t := 1; For i := 1 to 4 do t := t * i; Writeln(t); End

Answer 1

1) Ответ:14
2) Ответ: 73
3) Ответ: 24