Регистрация
erlan002
17.05.2020 17:51
Информатика
Есть ответ 👍

Составить программу на паскале - найти сумму и количество элементов массива от - 90 до 90
(​

203
403
Посмотреть ответы 1

Ответы на вопрос:

D2a0h0a9
D2a0h0a9
4,4(4 оценок)

var

    n : integer;

    s : decimal;

   

function fac(n : integer) : decimal;

begin

    result : = 1;

    for var i : = 1 to n do result : = result * i;

end;

begin

    write('введите n = ');

    readln(n);

    for var i : = 1 to n do s : = s+fac(i);

    writeln('s=', s);

end.

Популярно: Информатика