eleborati un program care sa calculeze pt primii n termeni:2*4*6*8...2n prin inst for while repeat
Răspunsuri la întrebare
Răspuns de
0
Program nume;
Uses crt;
var i, n, prod : integer;
Begin
Clrscr;
Writeln("Introduceti n");
Write("n="); Readln(n);
i := 2;
while(i<=n) do
Begin
prod := 2;
prod := prod * i;
i := i+2;
End;
Writeln("Produsul numerelor este: ",prod);
Readkey.
End.
Uses crt;
var i, n, prod : integer;
Begin
Clrscr;
Writeln("Introduceti n");
Write("n="); Readln(n);
i := 2;
while(i<=n) do
Begin
prod := 2;
prod := prod * i;
i := i+2;
End;
Writeln("Produsul numerelor este: ",prod);
Readkey.
End.
mariagoreanu9:
in pascal
Doar prin una din instrucţiuni?
prin amindoua
Ele-s 3 :D
da..
prin toate,dara
Alte întrebări interesante
Limba română,
8 ani în urmă
Limba română,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
9 ani în urmă
Limba română,
9 ani în urmă
Engleza,
9 ani în urmă
Geografie,
9 ani în urmă