Задать вопрос
ИнформатикаИнформатика
30 сентября, 00:00

Определите результат данной программы на языке Паскаль: Var a, k: integer; Begin a:=-2; For k:=-5 to 1 do a: = (-2) * a; write (a); end.

+3
Ответы (1)
  1. 30 сентября, 03:30
    0
    Рассмотрим данную программу.

    Var a, k : integer; / / - обозначаются переменные.

    begin

    a : = - 2; / / - переменной a изначально присваивается значение - 2.

    for k : = - 5 to 1 do a : = (-2) * a; / / - цикл со счётчиком, операция (-2) * a повторяется 7 раз. (В промежутке от - 5 до 1 расположено 7 целых чисел.)

    write (a); / / - вывод переменной a.

    end.

    Для нахождения a, как видно из программы, нужно - 2 умножить на a семь раз. Заметим, что после каждого нового раза переменная будет изменяться. Изначально она равна - 2, значит, на первом этапе ей будет присвоено значение (-2) * (-2) = 4. На втором уже (-2) * 4 = - 8, на третьем (-2) * (-8) = 16, и т. д. На последнем этапе, таким образом, a будет равняться 256.

    Ответ: 256.
Знаешь ответ на этот вопрос?
Сомневаешься в правильности ответа?
Получи верный ответ на вопрос 🏆 «Определите результат данной программы на языке Паскаль: Var a, k: integer; Begin a:=-2; For k:=-5 to 1 do a: = (-2) * a; write (a); end. ...» по предмету 📕 Информатика, используя встроенную систему поиска. Наша обширная база готовых ответов поможет тебе получить необходимые сведения!
Найти готовые ответы
Похожие вопросы информатике
6) Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin s : = 0; for n:=4 to 13 do begin s : = s + 15; end; write (s) end.
Ответы (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)
15. Определите результат выполнения программы:var i, sum: integer; begin sum: = 0; i: = 1; while i
Ответы (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)
Нужен ответ
1. Назовите город, правитель которого начал Троянскую войну. В каком веке это произошло? 2. Сформулируйте историческую причину начала Троянской войны? 3. Сформулируйте мифологическую причину начало Троянской войны?
Нет ответа
Исторический портрет Владимира Мономаха!
Нет ответа
Используя свойство 3 степеней, запишите в виде степениа) (2^2) ^3 б) (3^4) ^2 в) (3^7) ^2 г) (5^3) ^4 д) (10^3) ^5 е) (7^2) ^4
Нет ответа
Решите уравнение 3x-8 (x+2) = -41
Нет ответа
Дети ходили в лес за грибами и ягодами какие однородные члены предложения и как обозначить?
Нет ответа
Главная » Информатика » Определите результат данной программы на языке Паскаль: Var a, k: integer; Begin a:=-2; For k:=-5 to 1 do a: = (-2) * a; write (a); end.
Регистрация Забыл пароль