Question

Sã se afiseze primele n numere prime care au suma cifrelor mai mica decat un numar m, m si n introducandu.se de la tastatura . Plssss help me ! Vã rog frumos în pseudocod ! :)))

Answer 1

var n,m,i,k,x,s,z,c:integer;
begin
read(n,m);
for k := 1 to n do begin
x := 0;
for i := 1 to k do begin
if k mod i = 0 then inc(x)
end;
if x = 2 then begin
s:=0;
z:=k;
while z>0 do
begin
c:=z mod 10;
s += c;
z:= z div 10;
end;
if s<m then writeln(k);
end;
end;
end.