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

48 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 Döngü İle Bir Dizideki En Büyük Sayıyı Bulma Örneği

Delphi Bir Dizideki Tek Sayıların Adetini Bulma Örneği

Delphi Bir Stringten İlk N Karakteri Kaldırma Örneği

Delphi Fibonacci Serisinde N'inci Terimi Bulma Örneği

Delphi Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek