Задать вопрос
26 декабря, 19:53

Запишите значение переменной S, полученное в результате работы слудующей программы. Алгоритмический язык: алг нач цел n, s s:=0 нц для n от 3 до 7 s:=s+2*n кц вывод s кон ИЛИ (тоже самое только в Паскаль) var n, s: integer; begin s:=0; for n:=3 to 7 do s:=s + 2 * n write (s); end

+1
Ответы (1)
  1. 26 декабря, 22:03
    0
    Цикл выполнится 5 раз: 7 - 2 = 5.

    Параметр n при этом будет изменяться от 3 до 7. В переменной s будут просуммированы удвоенные значения параметра:

    n = 3, s = 0 + 2 * 36;

    n = 4, s = 6 + 2 * 4 = 14;

    n = 5, s = 14 + 2 * 5 = 24;

    n = 6, s = 24 + 2 * 6 = 36;

    n = 7, s = 36 + 2 * 7 = 50;

    Ответ: s = 50.
Знаешь ответ на этот вопрос?
Сомневаешься в правильности ответа?
Получи верный ответ на вопрос 🏆 «Запишите значение переменной S, полученное в результате работы слудующей программы. Алгоритмический язык: алг нач цел n, s s:=0 нц для n от ...» по предмету 📕 Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!
Найти готовые ответы
Похожие вопросы информатике
6) Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin s : = 0; for n:=4 to 13 do begin s : = s + 15; end; write (s) end.
Ответы (1)
Составить алгоритм сложения двух целых чисел F и Q, вводимых с клавиатуры. Результат сложения записать в виде переменной W. По данному алгоритму написать программу в Паскале. алг сложение цел F, Q, W нач ввод F ввод Q W:=F+Q вывод W кон 2.
Ответы (1)
Что напечатает следующая программа? program p3; var x, y:integer; procedure p1 (var a, b:integer); begin a:=sqr (a); b:=sqr (a) + a; end; procedure p2 (a, b:integer); begin a:=sqr (a); b:=sqr (b) + b; end; begin x:=2; y:=2; p1 (x, y);
Ответы (1)
var a, R : integer; Function F (x : integer) : integer; begin if x< = 0 then F:=0 else F:=x + F (x-2); end; begin a:=8; R:=F (a); write (R); end. В паскале ответ 20, как он получается? объясните поподробнее
Ответы (1)
Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin n : = 1; s : = 0; while n < = 20 do begin s : = s + 33; n : = n + 1 end; write (s) end.
Ответы (1)