• 
  • 10 February 2013
  Английский язык
  • Автор: жора1111

  

  составить на Паскале:

  1) программу для вычисления суммы ряда S=1+ 1/2+1/3+1/4+..+1/N. Число N вводится с клавиатуры.

  2) одноклеточная амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.

  3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).

  4) написать программу для вычисления n-ой степени числа А.

  помогите, пожалуйста)

• 
  • 10 February 2013
  • Ответ оставил: emblerik

  1)

  var

    s : real;

    i, n : integer;

  begin

    s := 0;

    read (n);

    for i := 1 to n do s := s + 1 / i;

    writeln (s);

  end.

   

  2)

  var

    a, i : integer;

  begin

    a := 1;

    for i := 1 to 8 do

    begin

      a := a * 2;

      writeln ('Через ', i * 3, 'часов будет ', a, ' амеб');

    end;

  end.

   

  3)

  var

    n, i : integer;

    x, s : real;

  begin

    s := 0;

    read (n, x);

    for i := 1 to n do

      s := s + sin (i * x);

    writeln (s);

  end.

   

  4)

  var

    n, a, r, i : integer;

  begin

    r := 1;

    read (a, n);

    for i := 1 to n do r := r * a;

    writeln (r);

  end.

  0
• 
  • НЕ НАШЛИ ОТВЕТ?

  Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предмету школьной программы: английский язык.
  На сегодняшний день (02.10.2024) наш сайт содержит 244792 вопросов, по теме: английский язык. Возможно среди них вы найдете подходящий ответ на свой вопрос.

  Найти другие ответы
• Нажимая на кнопку "Ответить на вопрос", я даю согласие на обработку персональных данных

  Ответить на вопрос

Последние опубликованные вопросы