найти произведение чисел кратных 2 от 1 до н
Ответы на вопрос
Ответил Leto519
0
6 наверное или 8.........
Ответил ToshaTH
0
тебе где это нужно выполнить? язык?
Ответил sc426316
0
паскаль
Ответил ToshaTH
0
program f;
uses crt;
var pr,f,n:integer;
f:=1;
pr:=1;
readln(n);
while f<=n do
begin
pr:=pr*f;
f:=f+2;
end;
writeln(pr);
uses crt;
var pr,f,n:integer;
f:=1;
pr:=1;
readln(n);
while f<=n do
begin
pr:=pr*f;
f:=f+2;
end;
writeln(pr);
Новые вопросы