Question

ПАСКАЛЬ. Выдает ошибку в 10 строке "Ожидался порядковый тип". Как исправить?
.
.
.
program SOCHET;
var a, b, c, n, i, j, l: real;
var factorial, factorial1, factorial2: longint;
begin
writeln ('Введите число, из которого высчитывается число сочетаний');
readln (a);
writeln ('Введите число, по которому высчитывается число сочетаний');
readln (b);
factorial := 1;
for i:=2 to a do
factorial := factorial * i;
a:=factorial;
factorial1 := 1;
for j:=2 to b do
factorial1 := factorial1 * j;
b:= factorial1;
factorial2 := 1;
for l:=2 to (a-b) do
factorial2 := factorial2 * l;
c:=factorial2;
n:=a/b*c;
writeln ('Число сочетаний равно ', n);
end.

Answer 1

Ответ:

В циклах не должно быть переменных с плавающей запятой (Типом real)

Меняй их на целое (integer;)

Объяснение: