• Напишите задачу в Pascal, на уровне 8-го класса ( с помощью циклического алгоритмам)

    question img

Ответы 1

  • VarN:integer;S:real;BeginN:=0;S:=0;While S<=5 do   Begin   N:=N+1;   S:=S+1/N;   End;WriteLn('N = ',N)End.
    • Автор:

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

Войти через Google

или

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

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

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