• помогите с информатикой 7 класс, цикл с предусловием while, 3 и 4 задачи

    question img

Ответы 6

  • program HelloWorld;varn, i : integer;b : boolean;begin i:=0; b:=false; read(n); while b=false do begin if i*i>n then b:=true else writeln(i); i:=i+1; end;end.
  • -------------------------
  • адача номер 4
  • ------------------------------
    • Автор:

      tigerh0vj
    • 5 лет назад
    • 0
  • program HelloWorld;varn, i, mem0, mem1, mem2 : integer;begin i:=0; mem0:=0; mem1:=1; read(n); writeln(mem0); writeln(mem1); while i<=n do begin i:=i+1; mem2:=mem0+mem1; writeln(mem2); mem0:=mem1; mem1:=mem2; end; end.
    • Автор:

      roccoxair
    • 5 лет назад
    • 0
  • решение ниже в комментарии
    • Автор:

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

Войти через Google

или

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

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

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