Advertisement
destr0y

Untitled

Mar 21st, 2020
1,263
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. var s : array of string := ('aojangweng', 'jengjweng', 'iasiofeqoi', 'aeguwbg');
  2. begin
  3.   for var i := 0 to s.Count-1 do
  4.   begin
  5.     if s[i].StartsWith('a') then continue;
  6.     writeln(s[i]);
  7.   end;
  8. end.
Advertisement
RAW Paste Data Copied
Advertisement