Urgent!!! Se citesc n elemente întregi.Care este suma elementelor aflate pe poziții impare în vector?
Programul sa fie în Pascal vă rogg!
Răspunsuri la întrebare
Răspuns de
1
program sumaPeRangImpar;
var n, i, s:integer;
v:array[1..100]of integer;
begin
write('n='); read(n);
writeln('Introdu ',n,' numere intregi:');
s:=0;
for i:=1 to n do
begin
read(v[i]);
if i mod 2=1 then s:=s+v[i];
end;
writeln('Suma elementelor de pe pozitii impare: ',s);
end.
Explicație:
sally10:
Mulțumesc multt
Alte întrebări interesante
Limba română,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
8 ani în urmă
Matematică,
8 ani în urmă
Limba română,
9 ani în urmă
Matematică,
9 ani în urmă
Fizică,
9 ani în urmă