1. citeste n
pare<-0
impare<-0
pentru i<-1,n executa
daca i mod 2=0 {
pare<-pare+1
altfel
impare<-impare+1
}
scrie "In sirul dat exista" pare "numere pare si" impare "numere impare"
2.citeste n
s<-0
pentru i<-1,n executa {
s<-s+i
}
scrie "Suma primelor" n "numere este" s
3. citeste n
d<-0
pentru i<-1,n executa {
citeste a
daca a mod 3 =0 atunci
d<-d+1
}
scrie"In sirul dat sunt" d "numere divizibile cu 3"