Informatika1/Feladatok2

A MathWikiből

A lap korábbi változatát látod, amilyen Morap (vitalap | szerkesztései) 2007. október 9., 13:49-kor történt szerkesztése után volt.

Feladatok

rek:=proc(x::integer)
local s,i;
if x<3 then
 return x;
end if;
s:=0;
for i from 1 to x-1 do
 s:=s+rek(i);
end do:
s;
end proc;

Mi lesz rek(5) értéke?

Mi lesz az eredménye az alábbi kódnak?

select(i->isprime(i+2),[seq(i,i=1..20)]);