{"id":722,"date":"2010-11-09T09:04:06","date_gmt":"2010-11-09T07:04:06","guid":{"rendered":"http:\/\/www.karadere.com\/blog\/?p=722"},"modified":"2010-11-09T09:04:06","modified_gmt":"2010-11-09T07:04:06","slug":"turbo-pascal-dizi-2-ornek-2","status":"publish","type":"post","link":"https:\/\/www.karadere.com\/blog\/turbo-pascal-dizi-2-ornek-2.html","title":{"rendered":"Turbo Pascal Dizi 5 \u00f6rnek"},"content":{"rendered":"<p>\/\/ 10 elemanl\u0131 bir tamsay\u0131 dizisinin s\u0131ralanmas\u0131<br \/>\n\/\/ h\u0131zl\u0131 s\u0131ralama<br \/>\n\/\/\u00a0 a=(8, 3, 12, 9, 16, 30, 25, 1, 29, 2)<\/p>\n<p>program en_buyuk;<br \/>\nvar<br \/>\n\u00a0a:array[1..10] of integer;<br \/>\n\u00a0i,b,k,m:integer;<br \/>\nbegin<br \/>\n\u00a0for i:=1 to 10 do begin<br \/>\n\u00a0 write(i,&#8217; .elemani gir..&#8217;);readln(a[i]);<br \/>\n\u00a0end;<br \/>\n\u00a0 repeat<br \/>\n\u00a0\u00a0 k:=1;<br \/>\n\u00a0\u00a0 for i:=1 to 9 do begin<br \/>\n\u00a0\u00a0\u00a0 if(a[i]&gt;a[i+1]) then begin<br \/>\n\u00a0\u00a0\u00a0\u00a0 b:=a[i];a[i]:=a[i+1];a[i+1]:=b;k:=0;<br \/>\n\u00a0\u00a0\u00a0 end;<br \/>\n\u00a0\u00a0 end;<br \/>\n\u00a0 until(k=1);<br \/>\n\u00a0 for i:=1 to 10 do<br \/>\n\u00a0\u00a0 writeln(a[i]);<\/p>\n<p>\u00a0readln;<br \/>\nend.<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\/\/ 10 elemanl\u0131 bir tamsay\u0131 dizisinin s\u0131ralanmas\u0131<br \/>\n\/\/ h\u0131zl\u0131 s\u0131ralama<br \/>\n\/\/  a=(8, 3, 12, 9, 16, 30, 25, 1, 29, 2)<\/p>\n<p>program en_buyuk;<br \/>\nvar<br \/>\n a:array[1..10] of integer;<br \/>\n i,b,k,m:integer;<br \/>\nbegin<br \/>\n for i:=1 to 10 do begin<br \/>\n  write(i,&#8217; .elemani gir..&#8217;);readln(a[i]);<br \/>\n end;<br \/>\n  repeat<br \/>\n   k:=1;<br \/>\n   for i:=1 to 9 do begin<br \/>\n    if(a[i]>a[i+1]) then begin<br \/>\n     b:=a[i];a[i]:=a[i+1];a[i+1]:=b;k:=0;<br \/>\n    end;<br \/>\n   end;<br \/>\n  until(k=1);<br \/>\n  for i:=1 to 10 do<br \/>\n   writeln(a[i]);<\/p>\n<p> readln;<br \/>\nend.<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"om_disable_all_campaigns":false,"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"_uf_show_specific_survey":0,"_uf_disable_surveys":false,"footnotes":"","_links_to":"","_links_to_target":""},"categories":[58],"tags":[818,1615,1656],"class_list":["post-722","post","type-post","status-publish","format-standard","hentry","category-turbo-pascal","tag-dizi","tag-ornek","tag-pascal","has-post-title","has-post-date","has-post-category","has-post-tag","has-post-comment","has-post-author",""],"aioseo_notices":[],"views":1816,"_links":{"self":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/posts\/722","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/comments?post=722"}],"version-history":[{"count":0,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/posts\/722\/revisions"}],"wp:attachment":[{"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/media?parent=722"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/categories?post=722"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.karadere.com\/blog\/wp-json\/wp\/v2\/tags?post=722"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}