Составить программу "найти произведение n натуральных чисел" при трех видов циклов.

YaShKa111111 YaShKa111111    1   21.06.2019 15:10    0

Ответы
D10A D10A  17.07.2020 06:46
Var n,i:integer;
begin
readln(n);
if (n < 0)
then
while (n < 0) do
for i:=1 to 10 do
n:=n+3
else
while (n > 0) do
for i:=1 to 10 do
n:=n-3;
writeln(n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика