Scrieti un program care calculeaza produsul numerelor naturale divizibile la 4 mai mici sau egale cu n. TURBO PASCAL
Răspunsuri la întrebare
Răspuns de
1
Program p1;
var p:longint; n,i:integer;
Begin
write('n=');read(n);
p:=1;
for i:=4 to n do
if i mod 4=0 then p:=p*i;
write(p);
End.
var p:longint; n,i:integer;
Begin
write('n=');read(n);
p:=1;
for i:=4 to n do
if i mod 4=0 then p:=p*i;
write(p);
End.
Alte întrebări interesante
Franceza,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
9 ani în urmă
Matematică,
9 ani în urmă
Matematică,
9 ani în urmă
Istorie,
9 ani în urmă