Menggunakan string dalam bahasa pempograman Freepascal
dan turbo C++
String pascal
uses crt;
var
n:string;
r,i,s:integer;
begin
clrscr;
write('ketikan kata yang anda suka=');readln(n);
r:=length(n);
for s:=1 to r do
begin
for i:=0 to s-i do
write(' ',n[s]);
writeln;
end;
readln;
end.
Input program
Output program
Listing program string pada bahasa C
#include<stdio.h>
#include<string.h>
void main()
{
char
namaLengkap[]="NURUL APRILIANI";
char
namaDicari[]="NURUL";
if
(strstr(namaLengkap,namaDicari)){
printf("%s terdapat dalam
%s",namaDicari,namaLengkap);
}
}
INPUT PROGRAM
LOGIKA PROGRAM
Setelah program selesai dibuat,selanjutnya
program akan memanggil librrary dengan tipe data char. Selnjutnya program berjalan dimana jika dalam nama lengkap ada
nama yang dicari,maka program akan menampilkan nama yang dicari tersebut,.
Begitu prosesnya program selesai.
OUTPUT PROGRAM