Задание 3.Составить программку вычисления суммы факториалов всех четных чисел от т

Задание 3.

Составить программку вычисления суммы факториалов всех четных чисел от т до п.

Задать свой вопрос
Лидия Забиева
На каком языке?
Denis Kvartalnev
паскаль
1 ответ

Var a, n, k, t, s:integer;

Bedin

Readln(n)

S:=0;

For i:=1 to n do

If i mod 2 =0 then

Begin

For t:=1 to i do

K:=k*t;

S:=s+k;

End;

Writeln(s);

End.

Марина
Oпределить меньший элемент каждой четной строки A[M,N], помогите пожалуйста сделать
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт