25
П(i- i/3)
i=n
Для вышеизложенного условия составить алгоритм (б/с), программу на ЯП
Паскаль и протестировать программу.
8-вариант
П(i- i/3)
i=n
Для вышеизложенного условия составить алгоритм (б/с), программу на ЯП
Паскаль и протестировать программу.
8-вариант
More Questions From This User See All
Answers & Comments
program fp;
uses
crt;
var
i: integer;
var
pr: real;
begin
pr := 1;
for i := 8 to 25 do
pr := pr * (i - (i / 3));
writeln('Ответ: ', pr: 20: 3);
readln;
end.