Question

1)Se citesc de la tastatura n numere intregi. Sa se calculeze media aritmetica a numerelor pare.
2)Sa se afiseze primele n numere naturale divizibile cu 5.
IN PSEUDOCOD.

Answer 1

{Sa se determine media artimetica a elementelor pare dintr-un vectorde numere intregi.}
denumirea programului;declararea variabilelor  var1 : array[1..100] of integer;                         var2, var6, var3, var4: integer;                         var5 : real;
evectuare{CITIRE VECTOR SI NUMARARE ELEMENTE PE CATEGORII}var4 := 0; var3 := 0;scrie 'Numar de elemente:' citeste(n);pentru i := 1 pina la var6 efectuam          scrie'var1[',var2,']=';         citeste (var1[var2]);         [functie] daca a este nr. par         atunci                                           var4:= var4 + var1[var2];                          var3 := var3 + 1;                 sf.atunci    sf. efectuam{AFISARE REZULTATE}media := suma / m;scrie('Media elementelor pare: ', var5);sf. efectuare

{ aproximativ }