• Предмет: Информатика
  • Автор: Shikoto
  • Вопрос задан 5 месяцев назад

ПОМОГИТЕ, ПЖ! Измените программу так, чтобы можно было вывести все числа последовательности, заданной формулой а^n=n/n^2 +1.​

Приложения:

master32wsp: Тьфу ты паскаль этот, почему питону не учат в школах
master32wsp: Я задачу не совсем понимаю
master32wsp: На фото просто переписать и протестить надо
master32wsp: А вы в условии просите какую-то формулу
master32wsp: И какой-то заданный список
master32wsp: Типа из вот этих вот списков чётных чисел надо вывести только числа которые удовлевтворяют условию (формуле)?
Shikoto: соглашусь, что задание странное. в задании букваньна написана эта формула и ничего более, поэтому я не могу ответить на этот вопрос, тк сама не совсем понимаю..
Shikoto: буквально*
betman134: = в паскале означает сравнение. Если в условии a^n это возведение в степень, тогда это не формула, а условие. В таком случае условие проверяет два числа, первое (a^n) стремящееся к бесконечности (числа будут огромными), а второе условие наоборот, будет стремиться к 1 (числа будут приближены к единице). Условие всегда будет отрицательно, так что я не понимаю задание.

Ответы

Ответ дал: Alphaeus
1

var n: integer;

a: real;

begin

   write('Введите n: '); read (n);

   for var i:=1 to n do

   begin

       a:=i/(i*i+1);  write(a, ' ');

   end;

end.


Shikoto: спасибо огромное!
Вас заинтересует