Soal UTS Algoritma dan Pemrograman BSI Smt 1

Selamat Pagi Sobat BSI,Gimana Kabar Sehat kan?yang lagi UTS Semangat ya,
di sini saya mau membagikan soal UTS BSI ,langsung aja ini script nya.

#include <iostream.h>
#include <conio.h>
#include <stdio.h>
#include <string.h>

main()
{
 char kd[3],nmbg[30],nip[20],nm[30],ulang,lagi;
 long int gaji,jam,ttl,bersih,lembur,pjk;

 a:
 clrscr();
 gotoxy(18,1);cout<<" Data Gaji Karyawan ";
 gotoxy(15,2);cout<<" PT. BENTANG MANUFACTURE ";
 cout<<"\n ***********************************************"<<endl;
 cout<<"\n Input NIP : ";cin>>nip;
 cout<<"\n Input Nama Karyawan : ";gets(nm);
 cout<<"\n Pilih Kode Bagian [B1/B2/B3] : ";cin>>kd;
 cout<<"\n Input Jumlah Jam Kerja/Bulan : ";cin>>jam;
 strupr(kd);
 if(strcmp(kd,"B1")==0)
 {strcpy(nmbg,"Data Entry");
  gaji=1000000;
  if(jam>200)
  {
  lembur=15000*(jam-200);
  }
  else
  {
  lembur=0;
  }
 }
 else if(strcmp(kd,"B2")==0)
 {strcpy(nmbg,"Programer");
  gaji=2000000;
  if(jam>200)
  {
   lembur=15000*(jam-200);
   }
   else
   {
   lembur=0;
   }
  }
 else if(strcmp(kd,"B3")==0)
 {strcpy(nmbg,"System Analist");
  gaji=3000000;
  if(jam>200)
  {
   lembur=15000*(jam-200);
   }
   else
   {
   lembur=0;
   }
  }
 else
 {
 cout<<"\n Anda Salah Input Kode,Silahkan Input Ulang [Y/T] : ";cin>>ulang;
 if(ulang=='Y'||ulang=='y')
 goto a;
 else
 goto b;
 }
 clrscr();
 gotoxy(16,1);cout<<" Data Gaji Karyawan ";
 gotoxy(16,2);cout<<"PT BENTANG MANUFACTURE ";
 cout<<"\n\n ************************************************";
 cout<<"\n\n NIP Karyawan : "<<nip;
 cout<<"\n\n Nama Karyawan : "<<nm;
 cout<<"\n\n Nama Bagian : "<<nmbg;
 cout<<"\n\n Gaji Pokok : "<<gaji;
 cout<<"\n\n Uang Lembur : "<<lembur;
 cout<<"\n -------------------------------------";
 ttl=gaji+lembur;
 cout<<"\n\n Total Gaji : "<<ttl;
 pjk=0.025*ttl;
 cout<<"\n\n Pajak : "<<pjk;
 cout<<"\n --------------------------------------";
 bersih=ttl-pjk;
 cout<<"\n Gaji Bersih : "<<bersih;
 cout<<"\n\n **************************************";
 cout<<"\n\n Input Data Lagi[Y/T] ? ";cin>>lagi;
 if(lagi=='Y'||lagi=='y')
 goto a;
 else
 goto b;
 getch();
 b:
 }