100-2023素数之和

问题：100-2023素数之和

答案：↓↓↓

陈志伟的回答：

网友采纳　　pascal:　　var　　s,i,x,t:longint;　　begin　　s:=0;　　forx:=100to1000dobegin　　t:=0;　　fori:=1toxdoifxmodi=0thent:=t+1;　　ift=2thens:=s+x;　　end;　　writeln('S=',s);　　end.