• Как можно решить 9 задание в ОГЭ другим способом?
    Вот задача:

    Var s, n: integer;
    Begin
    s := 2;
    For n := 2 to 5 do
    s := s + n*2;
    Writeln(s);
    End.

    Как то можно что-то в степень возвести, а что?? Чтоб долго таблицу не писать

Ответы 6

  • S + 28
    • Автор:

      meadow2
    • 5 лет назад
    • 0
  • Var s, n: integer;Begins := 2;For n := 2 to 5 dos := s + 2;Writeln(s);End.
  • Ответ 10?
    • Автор:

      jose833
    • 5 лет назад
    • 0
  • Я не совсем понимаю. Тебе нужны промежуточные ответы? Какая переменная не константа, чтобы от нее и искать?
    • Автор:

      sashal3bp
    • 5 лет назад
    • 0
  • В смысле? Просто надо найти s
  • 1) s=2    n=2  s:=2+4=62) s=6    n=3  s:=6+6=123) s=12  n=4  s=12+8=204) s=20  n=5  s=20+10=30При каждом шаге будем получать6_12_20_30...Видим закономерность2*3_3*4_4*5_5*6...Var s,s1,n: integer;Beginwriteln('Старый код');s := 2;For n := 2 to 5 dobegin  Write('s= ',s);  s := s + n*2;  Write('  n= ',n);  Writeln('  s= ',s);end;writeln;writeln('Новый код');for n:=2 to 5 do  begin    s:=n*(n+1);    write('n= ',n);    writeln('  s= ',s);  end;End.
    • Автор:

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

Войти через Google

или

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

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

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