Minggu, 30 Desember 2012

Menggunakan string dalam bahasa pempograman Freepascal dan turbo C++


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