• 1. Запишите значение переменной s, полученное в результате работы следующей программы.
    Var s,k: integer;
    Begin
    s := 0;
    for k := 6 to 12 do
    s := s+10;
    writeln(s);
    End.
    Ответ:
    введите число
    2. Определите, что будет напечатано в результате работы следующей программы.
    Var s,k: integer;
    Begin
    s := 0;
    for k := 4 to 8 do
    s := s+7;
    writeln(s);
    End.
    Ответ:
    введите число
    3. Определите, что будет напечатано в результате работы следующей программы.
    Var k,i: integer;
    Begin
    k := 4;
    For i := 1 to 3 do
    k := 2*k + i;
    Writeln(k);
    End.
    Ответ:
    введите число
    4. Определите, что будет напечатано в результате работы следующей программы.
    Var s,k: integer;
    Begin
    s:=0;
    for k:=1 to 11 do
    s:=s+12;
    write(s);
    End.
    Ответ:
    введите число
    5. Определите, что будет напечатано в результате работы следующей программы.
    var s, k:integer;
    begin
    s := 0;
    for k := 2 to 12 do
    s := s + 11;
    writeln (s);
    end.
    Ответ:
    введите число
    6. Определите, что будет напечатано в результате работы следующей программы.
    Var u,i: integer;
    Begin
    u := 26;
    For i := 1 to 5 do
    u := u – i;
    Writeln(u);
    End.
    Ответ:
    введите число
    7. Определите, что будет напечатано в результате работы следующей программы.
    var s, k:integer;
    begin
    s := 0 ;
    for k:= 4 to 11 do
    s := s + k ;
    writeln (s);
    end.
    Ответ:
    введите число
    8. Определите, что будет напечатано в результате работы следующей программы.
    var s, n: integer;
    begin
    s := 1;
    for n := 3 to 8 do
    s := s * 2;
    write(s);
    end.
    Ответ:
    введите число
    9. Определите, что будет напечатано в результате работы следующей программы.
    Var у,і: integer;
    Begin
    У := 0;
    For і := 1 to 3 do
    у := у + 4*і;
    Writeln(у);
    End.
    Ответ:
    введите число
    10. Определите, что будет напечатано в результате работы следующей программы.
    Var s,і:integer;
    Begin
    s := 3;
    For і := 2 to 5 do
    s := s + 2* і;
    Writeln (s) ;
    End.
    Ответ:

Ответы 1

  • Ответ:

    70, 35, 43, 132, 121, 11, 60, 64, 24, 31

    Объяснение:

    1) Изначально s = 0, затем на каждой из 12 – 6 + 1 = 7 итераций к ней прибавляется 10, итого получится 70

    2) Аналогично, s = 0 + 7 * (8 – 3) = 35

    3) Итерация с i = 1: k = 2 * 4 + 1 = 9. Итерация с i = 2: k = 2 * 9 + 2 = 20. Итерация с i = 3: k = 2 * 20 + 3 = 43.

    4) s = 0 + 12 * 11 = 132  

    5) s = 0 + 11 * (12 – 1) = 121

    6) u = 26 – 1 – 2 – 3 – 4 – 5 = 11

    7) s = 4 + 5 + … + 11 = 60

    8) s = 1 * 2 * 2 * … * 2 (8 – 3 + 1 раз) = 64

    9) y = 0 + 4 * 1 + 4 * 2 + 4 * 3 = 24

    10) s = 3 + 2 * 2 + 2 * 3 + 2 * 4 + 2 * 5 = 31

    • Автор:

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

Войти через Google

или

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

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

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