Впаскале. составить программу, по которой компьютер находит произведение нечетных чисел, начиная с единицы, и до тех пор, пока на вопрос, задаваемый после каждого шага вычислений: «продолжить вычисления? (д/н)», отвечают ‘д’.
105
437
Ответы на вопрос:
Var a: longint; b: integer; s: string; begin readln(s); a: =1; b: =1; repeat writeln('продолжить вычисления? (д/н)'); b: =b+2; a: =a*b; readln(s); until (s< > 'д'); write(a); end.
Популярно: Информатика
-
ClarisVerbis08.06.2022 19:52
-
Ludo4ka12301.03.2023 01:34
-
mia01701.06.2021 20:41
-
asdsssssssssss12409.08.2022 12:33
-
yuliav180110.09.2020 11:52
-
Nika034505.01.2022 20:01
-
PashinDaniil15.03.2020 20:25
-
MigelAlemanValdes19.01.2021 17:02
-
dmitry11311402.05.2021 12:02
-
SmilLl05.12.2020 10:59