Напишите программу вывода ** экран произведение пяти чисел используя цикл for

Question

Напишите программу вывода на экран произведение пяти чисел используя цикл for

Answer 1

Program n2;uses crt;var s,z1,z2,z3,z4,z5,i:integer;beginreadln(z1,z2,z3,z4,z5);s:=1;for i:=1 to 100 dos:=z1*z2*z3*z4*z5;writeln(s);end.

Comments

я надеюсь ты знаешь,что это не в 1 строчку пишется.Просто так скопировалось