#include < iostream>
using namespace std;
int main()
{
// 1*2*3*4*5*6*7*8*9*10 = 3628800
setlocale(lc_all, "russian");
unsigned int n;
long long int result = 1;
cin > > n;
for(int i = 1; i < = n; i++){
result = result * i;
}
cout < < endl < < result;
return 0;
}
проверка10
3628800
5
120
универсальный вариант. долго над решением думать не хотелось, так что ответ такой. поскольку ограничений на решение не было)
//pascalabc.net версия 3.4.0.1677 от 17.06.18
//если программа не запускается, то обновите версию
var
n: integer;
s: string;
begin
readln(n);
s : = '';
while n > 0 do
begin
s : = (n mod 10).tostring() + '0
' + s;
n : = n div 10;
end;
writeln(s);
end.
Поделитесь своими знаниями, ответьте на вопрос:
Можно ли расписание уроков считать информационными моделями