ДАМ 40 БАЛЛОВ!!!!!!!!!!!!!!!! Помогите, пожалуйста, по информатике n! - k!

ДАМ 40 БАЛЛОВ!!!!!!!!!!!!!!!! Помогите, пожалуйста, по информатике
n! - k!

Задать свой вопрос
1 ответ

Язык Pascal ABC, вводятся два числа (n и k), выводится значение n!-k!


function F(n: longint): longint;

begin

 if n = 1 then f := 1

 else f := f(n - 1) * n;

end;

var

 n, k: longint;

begin

 readln(n, k);

 writeln(F(n) - F(k));

end.

, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт