• 6) Определите, что будет напечатано в результате работы следующего фрагмента программы:

    var n, s: integer;
    begin
    s := 0;
    for n:=4 to 13 do begin
    s := s + 15;
    end;
    write(s)
    end.

    5) Определите значение переменных a и b после выполнения следующего фрагмента программы:

    a := 2468;
    b := (a mod 1000)*10;
    a := a div 1000 + b;
    Выведите значения а и b через пробел.\

    4) Определите, что будет напечатано в результате работы следующего фрагмента программы:
    var k, s: integer;
    begin
    s:=0;
    k:=0;
    while s < 100 do begin
    s:=s+k;
    k:=k+4;
    end;
    write(k);
    end.

Ответы 1

  • 6. Цикл for выполнится 10 раз (значение n от 4 до 13), и каждый повтор к s будет прибавляться 15. То есть после выполнения s=1505.a := 2468;b := (a mod 1000)*10 a mod 1000 - остаток от деления 2468 на 1000, то есть 468.b = 468*10 = 4680a := a div 1000 + b;a div 1000 - деление 2468 на 1000 с остатком, то есть 2a = 2 + b = 4680 + 2 = 4682Ответ: 4682 46804. Цикл while выполняется, пока s < 100, и каждый повтор цикла s увеличивается на k, при этом k каждый повтор цикла увеличивается на 4. То есть 1 повтор цикла: s = 0, k = 42 повтор цикла: s = 4, k = 83 повтор цикла: s = 12, k = 124 повтор цикла: s = 24, k = 165 повтор цикла: s = 30, k = 206 повтор цикла: s = 50, k = 247 повтор цикла: s = 74, k = 288 повтор цикла: s = 102, k = 32, условие перестало выполняться, цикл завершился.k = 32
    • Автор:

      moochie
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years