Составить программу вычисления произведения первых 7 натуральных чисел

var

    i, e : integer;

begin

    e : = 1;

 

    for i : = 1 to 7 do

      e : = e * i;

 

    writeln(e);  

end.

а) 38

б) 42

в) 73

Объяснение:

а) 26 в 16 с.сч. = 38 в 10 с.сч.

26 в 8 с.сч. = 22 в 10 с.сч.

11101 в 2 с.сч. = 29 в 10 с.сч.

Под буквой А правильным ответом будет 38

б) 28 в 16 с.сч. = 40 в 10 с.сч.

47 в 8 с.сч = 39 в 10 с.сч.

101010 в 2 с.сч = 42 в 10 с.сч.

Под буквой Б правильным ответом будет 42

в) 49 в 16 с.сч = 73 в 10 с.сч.

102 в 8 с.сч. = 66 в 10 с.сч.

1000111 в 2 с.сч = 71 в 10 с.сч.

Под буквой В правильным ответом будет 73

Надеюсь , удачи!

P.S. если моё решение было действительно полезным и в полной мере закрыло вопрос, отметь его Лучшим !)

Процедуры, не связанные с объектами и событиями, называются процедурами пользователя или подпрограммами. Пользовательские процедуры можно использовать неоднократно. Если текст процедуры пользователя был записан в разделе General - в окне программного кода формы, то она будет доступна только для данной формы, но не доступна для других форм этого же приложения.

Чтобы процедура пользователя была доступна на всех формах приложения, ее текст следует записать в специальном окне

Module - модуль приложения. Программный код такой процедуры будет храниться в файлах приложения с расширением *.bas.