Turbo Pascal – Vize Final örneği
program vizefinal; var ad:string[20]; v,f,b:integer; bn:real; cv:char; label 10,20; begin 10:write('adi soyadi..');readln(ad); write('vize notu...');readln(v); write('final notu...');readln(f);...
View ArticleTurbo Pascal – Dizi örneği
// 10 elemanlı bir tamsayı dizisindeki en büyük elemanın // bulunması // a=(12, 3, 21, 9, 8, 11, 34, 1, 10, 4) program en_buyuk; var a:array[1..10] of integer; i,eb:integer; begin for i:=1 to 10 do...
View ArticleTurbo Pascal Dizi 2 örnek
// 10 elemanlı bir tamsayı dizisinin ortalamasına en yakın // tamsayıdan dizide varmıdır varsa hangileridir? // a=(12, 3, 21, 9, 8, 11, 26, 1, 10, 4) program en_buyuk; var a:array[1..10] of integer;...
View ArticleTurbo Pascal Dizi 3 örnek
// 10 elemanlı bir tamsayı dizisinin ortalamasına en yakın // dizideki tamsayı hangisidir? // a=(8, 3, 12, 9, 16, 30, 25, 1, 29, 2) program en_buyuk; var a:array[1..10] of integer; i,tp:integer;...
View ArticleTurbo Pascal Dizi 4 örnek
// 10 elemanlı bir tamsayı dizisinin sıralanması // a=(8, 3, 12, 9, 16, 30, 25, 1, 29, 2) program en_buyuk; var a:array[1..10] of integer; i,b,k,m:integer; begin for i:=1 to 10 do begin write(i,'...
View ArticleTurbo Pascal Dizi 5 örnek
// 10 elemanlı bir tamsayı dizisinin sıralanması // hızlı sıralama // a=(8, 3, 12, 9, 16, 30, 25, 1, 29, 2) program en_buyuk; var a:array[1..10] of integer; i,b,k,m:integer; begin for i:=1 to 10 do...
View ArticleSublimetext editor MAc os x , Ubuntu ve Windows
Sublimetext editor MAc os x , Ubuntu ve Windows
View Article