Delphi Bir Stringin İlk Orta ve Son Karakterini Alma Örneği

246 Okunma Delphi

"Delphi" Programlama dilinde "Bir Stringin İlk Orta ve Son Karakterini Alma Örneği" ile ilgili kod örneği aşağıdadır. 

program Main;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  str1, res: string;
  l, mi: integer;
begin
  str1 := 'Yazilim';
  WriteLn('Orjinal String: ', str1);

  res := str1[1];

  l := Length(str1);

  mi := l div 2;

  res := res + str1[mi + 1];

  res := res + str1[l];

  WriteLn('Yeni String: ', res);
end.
String İlk Orta Son Karakter Delphi

İlginizi Çekebilir

Delphi Bir String İçinde Başka Bir Stringin Adetini Bulma Örneği

Delphi Bir Dizi Gerçek Sayının Çarpımını Bulma Örneği

Delphi Döngü Kullanarak Fibonacci Serisi Yazdırma Örneği

Delphi Dizideki Bir Elemanı Döngü İle Arama Örneği

Delphi Dizideki Herhangi Bir Konuma Eleman Ekleme Örneği