Programación Dede
(1)
var i, s: entero largo;
Inicio
I:= 0;
s:= 0;
Repetir
I:= I+1;
Si modifico 2 & lt& gt0 entonces s:= s-(2 * I-1);
Si i mod 2=0 entonces s:= s+(2 * I-1);
Hasta I = 10;
Escribe;
Fin.
(2)
var i, j, s: entero largo
Inicio
I:= 0;
j:= 0;
s:= 0;
Repetir
I:= I+1;
Repetir
j:= j+1;
s:= s+2 * j-1
Hasta j = I
j:= 0;
Hasta I = 10;
Escribir;
Fin.