Даны два целых числа A и B (A < B). Найтипроизведение всех целых чисел от A до B…

Question

49

Даны два целых числа A и B (A < B). Найтипроизведение всех целых чисел от A до B включительно.

в избранное ссылка

Знаете ответ?

gidkld · Accepted Answer

65

gidkld

22 февраля 2023

Uses crt; var a,b,i: integer; pr: longint; beginreadln (a,b); pr: =1; for i: =a to b dopr: =pr*i; writeln (pr); end.

комментировать

в избранное ссылка отблагодарить