Предмет: Информатика,
автор: artemstarkov
Составьте программу , печатающую произведение натуральных чисел x€[1,5]
Ответы
Автор ответа:
2
var
multi: integer := 1;
index: integer;
begin
for index := 1 to 5 do multi *= index;
write(multi);
end.
multi: integer := 1;
index: integer;
begin
for index := 1 to 5 do multi *= index;
write(multi);
end.
Интересные вопросы
Предмет: Английский язык,
автор: alchemistgg0
Предмет: Математика,
автор: MolkyWay
Предмет: Физика,
автор: mirayatsenko
Предмет: Математика,
автор: Муравей111
Предмет: Математика,
автор: saaa2003