Регистрация
Dana1906
Есть ответ 👍

Программирование циклических алгоритмов. вычислить сумму натурального ряда чисел от 1 до n если n равно

217
361
Посмотреть ответы 2

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

iraromanova2002
iraromanova2002
4,4(86 оценок)

Program programma;

Uses crt;

var n,p,i: integer;

Begin clrscr;

      write('Введите число N = ');

      readln(n);

      p:=1;

     

if (n<=12) and (n>0) then begin

write('P=');

for i:=1 to n-1 do

    begin

    p:=p*i;

    write(i,'*');

    end;

p:=p*n;

write(n,'=', p);

end;

End.

Объяснение:

2003lyuba
2003lyuba
4,7(48 оценок)

Природа важна, убедились мы в этом

Ее охранять будем мы этим летом

Чтоб всегда было чисто вокруг

Помни, это любимый мой друг!

Объяснение:

:3

Популярно: Другие предметы