< >

Напиши программу на языке Паскаль.
Вычислить n!, если значение n пользователь вводит с клавиатуры.

Если n=8, то на экране выводится n!=
.

Ответы

Ответ дал: vikidiki
5

Код:

var  n, i, s: integer;

begin

 read(n);

 s := 1;

 for i := 1 to n do

   s := s * i;

 writeln('n!= ', s);

end.

Аноним: хорош
Аноним: спасибо
Похожие вопросы
Биология
1 год назад
До включень рослинної клітини що містять у собі Кристоло їди глобоїди належать на мені
Литература
1 год назад
Чого спільного між Корделією та її сестрами?​
История
1 год назад
помогите плис дам 10 б​
Физика
1 год назад
ДАЮ 25 БАЛЛОВ!СРОЧНО!! Мопедіст наздоганяє пішохода:Хом=-200 м; Ѵом=22 м/с; приск.-2 м/с в кв.; Хоп=100 м; Ѵоп=2 м/с. а) вказати характер руху кожного? 6) написати рівняння координати руху тіл? в)
Другие предметы
2 года назад
задание 1. А)Назовите признаки, по которым выделяют человеческие расы. Б) К каким расам относятся твои одноклассники? С) Определи национальный состав своего класса и составь круговую диаграмму
Қазақ тiлi
2 года назад
Помогите пожалуйста!!!! 1.Жинақтық сан есім жасайтын жұрнақтарды табыныз. A) – ға, -ге. B) – ып, -іп. C) – ның, -нің. D) – ау, -еу. E) – мен, -пен. 2.Заттың санын, ретін білдіретін сөз табын
Алгебра
8 лет назад
СРОЧНО!!!с решением пожалуйста)))
Информатика
8 лет назад
Что размещается на панели задач в Linux