Регистрация
ВасилийПупкин227
23.03.2020 12:22
Информатика
Есть ответ 👍

Написать программу вычисления n! =1*2*3**n

165
467
Посмотреть ответы 2

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

adidas128
adidas128
4,6(9 оценок)
Program x; var k,n,i,j: longint; mas: array[1..10000] of longint;   begin read(n); for i: =1 to 10000 do      mas[i]: =0;   mas[10000]: =1; for j: =1 to n do      begin       for i: =1 to 10000 do         mas[i]: =mas[i]*j;         for i: =10000 downto 2 do           begin            mas[i-1]: =mas[i-1]+mas[i]div 10;         mas[i]: =mas[i]mod 10;         end;     end; i: =1; while mas[i]=0 do          i: =i+1; for j: =i to 10000 do     write(mas[j])  end.
utyak717
utyak717
4,4(94 оценок)
Кхм, ну, расположение материков, океанов, и т.п. короче говоря: раз глобус - модель земли, значит у них, в принципе, все общее. проще назвать различия: размер, конечно, и форма. земля приплюснута с полюсов, а глобус - нет. ну и у земли нет ножки: )

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