Составьте программу, которая вычисляет произведение натуральных чисел от 5 до 10 и выводит на экран результат (ИСПОЛЬЗОВАТЬ ТОЛЬКО ЦИКЛ while)
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Vari, ans: integer;
Begin
i:= 5;
ans:= 1;
While i <= 10 do Begin
ans:= i*ans;
i:= i + 1;
end;
Writeln(ans);
end.