Blog for Learning

This blog contains lesson material, material summary, questions and answers, definitions, types and examples, and others.

Advertisement

Powered by Blogger.

Visitors

Flag Counter

Pages

Contoh program manipulasi string pada pascal dan c++

Contoh program manipulasi string pada pascal dan c++


Assalamu’alaikum Wr Wb
Kali ini saya akan berbagi postingan tentang contoh-contoh program manipulasi string pada pascal dan c++. Namun akan saya jelaskan terlebih dahulu pengertian dari string. String (Computer Science) adalah sederetan simbol yang tidak tertentu panjangnya, yang dianggap sebagai panjang satu unit” (World Agreement Agenda O812). String dapat berupa huruf, angka, karakter khusus, maupun karakter Unicode. Dalam bahasa C++ terdapat beberapa fungsi yang digunakan untuk operasi pengolahan string. (https://singgihss.wordpress.com/c/string-pada-c/ )

Berikut beberapa contoh program manipulasi string pada pascal dan c++ yang berupa source code dan sreenshoot hasilnya. Untuk bahasa pascal yang saya gunakan adalah free pascal, sedangkan untuk bahasa c++ saya menggunakan Dev C++.

A.    Contoh program manipulasi string pada pascal
1.      program untuk membalik suatu string
a.      Source code
program membalik;
uses crt;
   var
s,t:string;
p,q,i,j,k:integer;
 begin
   writeln ('masukan kata yang ingin dibalik pembacaanya : ' );
   readln(s);
   p:= length(s);
   i:=1;
   for q:=p downto 1 do
          begin
         insert(s[q],t,i);
         inc(i);
        end;
          writeln(t);
              writeln;
                writeln;
                   writeln('       ilkom.inc        ');
               readln;
          end.

b.      Hasil program



2.      program untuk menghitung jumlah huruf capital dan huruf kecil
a.      Source code
program karakterhitung;
uses crt;
var
   kalimat:string;
   jumlah,i,kapital,kecil:integer;
begin
     writeln ('masukan kalimat yang akan dihitung : ');
   readln(kalimat);
         jumlah:=length(kalimat);
   kapital:=0;
   kecil:=0;
   writeln('kalimat:',kalimat);
   for i:=0 to jumlah do
      begin
         if (kalimat[i]) in ['A'..'Z'] then kapital:=kapital+1
         else kapital:= kapital;
         begin
      if (kalimat[i]) in ['a'..'z'] then kecil:= kecil+1
      else kecil:=kecil;
      end;
      end;
   writeln('jumlah huruf kapital   =',kapital,'huruf');
   writeln('jumlah huruf kecil       =',kecil,'huruf');
   writeln;
   writeln;
   writeln('     Ilkom.inc      ');
   readln;
end.

b.      Hasil program


3.      program yang mengkonversi setiap huruf kecil menjadi huruf capital dan setiap huruf capital menjadi huruf kecil
a.      Source code
program konversistring;
uses crt;
  var
      i : integer;
      kalimat : string;
Begin

    Writeln ('Masukkan Kalimat yang hendak di konversi : ');
       Readln(kalimat);
         For i := 1 to Length(kalimat) do
            if ord(kalimat[i]) > 96 then
                begin
                     kalimat[i] :=chr(ord(kalimat[i]) - 32);
                end
            else if ord(kalimat[i]) = 32 then
                 begin
                      kalimat[i] := chr(32);
                 end
            else if ord(kalimat[i]) < 96 then
                  begin
                         kalimat[i] := chr(ord(kalimat[i]) + 32 );
                  end;
      Writeln ('                       output                ');
       writeln (kalimat);
       writeln;
       writeln;
       writeln ('                      Ilkom.inc             ');
       Readln;
End.

b.      Hasil program




4.      program yang memanipulasi string sehingga menghasilkan output berupa tangga berbetuk segitiga.
a.      Source code
Program tanggastring;
 uses crt;
  var
  x,y : integer;
  kata:string;
  begin
  kata := 'ILMUKOMPUTER2016@UNNES';
  for x:= 1 to length(kata) do
  begin
  for y:= 1 to x do
  begin
  write (kata[y]);
    if (y < x) then
    begin
    write ('-');
    end;
    end;
  writeln();
    end;
    writeln;
    writeln;
    writeln ('                        Ilkom.inc              ');
    readln;
  end.

b.      Hasil program


B.     Contoh program manipulasi string c++
1.      program untuk membalik suatu string
a.      Source code
#include <iostream>
#include <string.h>
#include <conio.h>
#include <stdio.h>
using namespace std;

int main ()
{
  char string[30];
  int panjangstring;
 
  cout<<"PROGRAM PEMBALIK STRING"<<endl;
  cout<<"Masukkan kalimat : ";
  cin.getline(string,30);
  cout<<endl<<"Kalimat setelah dibalik : ";
 
  panjangstring = strlen(string)-1;
  while (panjangstring >= 0)
  {
     cout<<string[panjangstring];
     panjangstring = panjangstring - 1;
  }
  getch();
}

b.      Hasil program
2.      program untuk menghitung jumlah huruf capital dan huruf kecil
a.      Source code
#include <iostream>
#include <string.h>
#include <conio.h>
#include <stdio.h>
using namespace std;

main ()
{
  char kalimat[100];
  int jml_char, jml_kap, jml_kcl;
  int index;
  char karakter;
 
  cout<<"PROGRAM MENGHITUNG JUMLAH HURUF KAPITAL DAN HURUF KECIL"<<endl<<endl;
  cout<<"Masukkan kalimat : ";
  cin.getline(kalimat,100);
  cout<<endl;
 
  jml_char = jml_kap = jml_kcl = 0;
  index=0;
 
  while (kalimat[index])
  {
     karakter = kalimat[index];
     jml_char++;
    
     if (karakter >= 'A' && karakter <= 'Z')
     jml_kap++;
    
     if (karakter >= 'a' && karakter <= 'z')
     jml_kcl++;
     index++;
  }

cout<<"Jumlah karakter       = "<<jml_char<<endl;
cout<<"Jumlah huruf kapital  = "<<jml_kap<<endl;
cout<<"Jumlah huruf kecil    = "<<jml_kcl<<endl;
return 0;

}

b.      Hasil program



3.      program yang mengkonversi setiap huruf kecil menjadi huruf capital dan setiap huruf capital menjadi huruf kecil
a.      Source code
#include<iostream>
#include<conio.h>
#include<string.h>
#include<stdio.h>
using namespace std;

void abc(char *a)
{
    int i;
    for(i=0;i<15;i++)
   {
        if(a[i]>=65&&a[i]<=90)
       {a[i]=a[i]+32;}
        else if(a[i]>=97&&a[i]<=122)
       {a[i]=a[i]-32;}
   }
}

int main()
{
         char a[50];
         cout<<"PROGRAM KONVERSI HURUF KAPITAL DAN HURUF KECIL"<<endl;
         cin.getline(a,50);
         abc(a);
         cout<<"Hasil konversi : "<<endl;
         cout<<a;
}

b.      Hasil program

4.      program yang memanipulasi string sehingga menghasilkan output berupa tangga berbetuk segitiga.
a.      Source code
#include <iostream>
#include <string.h>
#include <conio.h>
#include <stdio.h>
using namespace std;

int baris, n, x;
char kata[90];

main ()
{
  cout<<"PROGRAM SEGITIGA STRING"<<endl;
  cout<<"Masukkan kata : ";
  cin.getline(kata,90);
  cout<<kata[0];
  cout<<endl;
  baris=strlen(kata)-1;
  for (n=1;n<=baris;n++)
  {
      cout<<kata[0];
      for(x=1;x<=n;x++)
      {
           cout<<"-"<<kata[x];
      }
      cout<<endl;
  }
  return 0;
}

b.      Hasil program



Sekian postingan saya kali ini, semoga bermanfaat. Terima kasih sudah berkunjung di Blog for Learning, tunggu postingan selanjutnya.

Wassalamu’alaikum Wr Wb
0 Komentar untuk "Contoh program manipulasi string pada pascal dan c++"

Silahkan berkomentar sesuai artikel

 
Template By Kunci Dunia
Back To Top