Вася очень любил играть в карты. Однажды он решил написать программу, которая за него будет
выбирать правильный ход. Программу он составил, осталось только ее проверить. Для проверки он решил запустить программу для всех возможных перемешиваний колоды. Он знает, что для каждой колоды программа работает ровно одну секунду. Необходимо определить, сколько секунд будет работать проверка на всех возможных перемешиваниях колоды, если в колоде N карт.
Знаешь ответ?
Чтобы оставить ответ, войдите или зарегистрируйтесь.
Ответ или решение 1
Малок
Запишем решение программы на языке Pascal ABC
program z1;
var
n,i:longint;
k:comp;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
read(n);
k:=1;
for i:=1 to n do
k:=k*i;
writeln(k:0:0);
close(input);
close(output);
end.
program z1;
var
n,i:longint;
k:comp;
begin
assign(input,'input.txt');
reset(input);
assign(output,'output.txt');
rewrite(output);
read(n);
k:=1;
for i:=1 to n do
k:=k*i;
writeln(k:0:0);
close(input);
close(output);
end.
Новые вопросы в разделе Информатика
s3129502@gmail.com
16.02.2024, 13:53
Информатика
7-9 класс
Адинела
05.10.2022, 08:15
Гаязутдин
05.10.2022, 01:10
Алайбек
05.10.2022, 01:05
Акияма
05.10.2022, 01:00
