if then
Delphi ile tek satır kodda toplayalım. Giriş, gelişme, sonuç for i:=strtoinT(edit1.text) to strtoint(edit2.text) do if ISPrime(i) then listbox1.Item...