Ответы на вопрос:
var
pr,i : integer;
begin
pr := 1;
i := 10;
repeat
pr *= i;
i := i - 2;
until i < 0;
writeln(pr);
end.
Популярно: Информатика
-
22879511130.08.2021 03:06
-
алина389425.04.2023 02:39
-
Polinka8030.11.2020 00:51
-
тоты201718.10.2021 23:00
-
А04рлан0528.09.2021 21:49
-
kirrilkyplenow18.02.2021 11:18
-
умненькийкотенок16.12.2021 00:09
-
двоишник27109.07.2020 10:25
-
koshulinskayag16.03.2022 22:03
-
nogood227.05.2020 22:09