• Напишите, пожалуйста, программы в паскале
    Хотябы одну :(
    ♥♥♥

    1)По данному натуральному n вычислите сумму 12+22+...+n2.
    Входные данные
    Вводится единственное натуральное число n, не превосходящее 100
    Выходные данные
    Необходимо вывести вычисленную сумму.
    Примеры
    Входные данные
    2
    Выходные данные
    5

    2) Вычислите N! ("эн-факториал") – произведение всех натуральных чисел от 1 до N ( N!=1∙2∙3∙…∙ N ).
    Входные данные
    Вводится единственное число N – натуральное, не превосходит 12.
    Выходные данные
    Выведите полученное значение N!
    Примеры
    Входные данные
    2
    Выходные данные
    2
    Входные данные
    3
    Выходные данные
    6

    3) По данному натуральному числу N найдите сумму чисел 1+1/1!+1/2!+1/3!+...+1/N!. Количество действий должно быть пропорционально N.
    Входные данные
    Задано единственное число N
    Выходные данные
    Необходимо вывести результат вычисления в виде действительного числа c точностью до 5 знаков после запятой.
    Примеры
    Входные данные
    1
    Выходные данные
    2

    4) вывести таблицу умножения на 9 с помощью цикла.

Ответы 1

  • 1.var n,i,s:integer;beginreadln(n);s:=0;for i:=1 to n do s:=s+i*i;writeln('s = ',s);end.Пример:252.var n,i,f:integer;beginreadln(n);f:=1;for i:=1 to n do f:=f*i;writeln(f);end.Пример:363.var n,i,f:integer; s:real;beginreadln(n);s:=1; f:=1;for i:=1 to n do begin f:=f*i; s:=s+1/f; end;writeln(s:6:4);end.Пример:32.66674.var i:integer;beginfor i:=1 to 9 do writeln(9,' * ',i,' = ',9*i);end.Результат:9 * 1 = 99 * 2 = 189 * 3 = 279 * 4 = 369 * 5 = 459 * 6 = 549 * 7 = 639 * 8 = 729 * 9 = 81
    • Автор:

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

Войти через Google

или

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

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

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