Вариант 1 Составить тремя способами (Используя 3 вида циклов) алгоритм вычисления произведения 5 чисел, вводимых с клавиатуры.
var
a : real;
sum : real;
i : integer;
begin
for i := 1 to 5 do
readln(a);
sum := sum + a; //первый способ
end;
writeln(sum);
i := 1;
sum := 0;
while i <= 5 do</p>
sum := sum + a;
i += 1;
writeln(sum); //второй
repeat
until i > 5;
writeln(sum); //третий
end.
rockstarrrrr помоги
помоги пожалуйста
rockstarrrr
помоги
прошу
пожалуйста
помоги прошу