a guest Dec 16th, 2018 61 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
- while i<=n do
- if prch[i]=0 then
- for j:=i+1 to n do
RAW Paste Data