SlideServe
Menu
Préférences
© SlideServe · v2026

PENGAMANAN INFORMASI DENGAN SANDI VIGENERE

sabine avatar
13 diapositives · 365 Views · Aug 28, 2014

PENGAMANAN INFORMASI DENGAN SANDI VIGENERE. OLEH : SYAIFULLAH. PENDAHULUAN. EFUL. KEVIN. DEFINISI MASALAH. ASCI. KUNCI NYA. ENKRIPSI. DESKRIPSI. PEMECAHAN MASALAH DENGAN FLOWCHART. START. I<3. T. G. Y. INPUT NAMA. CH=READKEY(). CH=#13. T. PASS=PASS+CH. WRITE(‘*’). Y.

PENGAMANAN INFORMASI DENGAN SANDI VIGENERE - slide 1
01 / 13PENGAMANAN INFORMASI DENGAN SANDI VIGENERE
1 / 17

Télécharger la présentation

PENGAMANAN INFORMASI DENGAN SANDI VIGENERE
Une image / un lien ci-dessous est fourni (tel quel) pour télécharger la présentation

Politique de téléchargement : le contenu du site vous est fourni TEL QUEL pour votre information et votre usage personnel ; il ne peut être vendu, concédé sous licence ni partagé sur d’autres sites sans l’accord de son auteur.Le contenu vous est fourni TEL QUEL, pour votre information et votre usage personnel uniquement. Téléchargez la présentation en cliquant sur ce lien. Lors du téléchargement, si vous ne parvenez pas à télécharger une présentation, l’éditeur a peut-être supprimé le fichier de son serveur.Pendant le téléchargement, si vous ne parvenez pas à obtenir une présentation, le fichier a peut-être été supprimé par l’éditeur.

F I N

Plus de contenu associé

Transcription de la présentation
  1. PENGAMANAN INFORMASIDENGAN SANDI VIGENERE OLEH : SYAIFULLAH

  2. PENDAHULUAN EFUL KEVIN

  3. DEFINISI MASALAH ASCI KUNCI NYA ENKRIPSI

  4. DESKRIPSI

  5. PEMECAHAN MASALAH DENGAN FLOWCHART

  6. START I<3 T G Y INPUT NAMA CH=READKEY() CH=#13 T PASS=PASS+CH WRITE(‘*’) Y NAMA=’SYAIFUL’ AND PASS= ’1->P3TRUK’ ANDA BERHAK MENGGUNAKAN PROGRAM INI A INC(I) I<3 T ANDA TIDAK BERHAK MENGGUNAKAN PROGRAM INI G Y END ANDA MEMPUNYAI KESEMPATAN TINGGAL 3-I KALI

  7. A H INPUT PIL Y PIL=1 PROC PLAINTEX B T Y PIL=2 PROC ENKRIPSI C T Y PIL=3 PROC H_ENKRIPSI D T Y PIL=4 PROC DESKRIPSI E T Y PIL=5 PROC H_DESKRIPSI F T Y T PIL=6 G

  8. B ASSIGN(T,’C:\PLAIN.TXT’ REWRITE(T) BACA TEMP Y TEMP<>’’ CLOSE(T) T H WRITELN(T,TEMP) READLN(TEMP)

  9. C A ASSIGN(T1,’C:\PLAIN.TXT’) ASSIGN(T2,’C:\ENKRIPSI.TXT’ RESET(T1) REWRITE(T2) K1=(K1+ORD(KUNCI(I1) Y K1>255 K1=K1-255 I1=1 T I1=LENGTH (KUNCI) Y INPUT KUNCI I1=1 C Y EOF(T1) T CLOSE(T1) CLOSE(T2) I1=I1+1 T K1=1 C1=CHR(K1) H B Y EOLN(T1) WRITE(T2,C1) READLN(T1) WRITELN(T2) T B READ(T1,C1) C K1=ORD(C1) A

  10. D ASSIGN(T,’C:\H_ENKRIPSI.TXT’ RESET(T) Y EOF(T) CLOSE(T) T H WRITELN(T,TEMP) READLN(TEMP)

  11. E A ASSIGN(T1,’C:\ENKRIPSI.TXT’) ASSIGN(T2,’C:\DESKRIPSI.TXT’ RESET(T1) REWRITE(T2) K1=(ORD(C1)-ORD(KUNCI[I1])) Y K1=((K1+255)-ORD(KUNCI[I1])) K1<0 I1=1 T I1=LENGTH (KUNCI) Y INPUT KUNCI I1=1 C Y EOF(T1) T CLOSE(T1) CLOSE(T2) I1=I1+1 T K1=1 C1=CHR(K1) H B Y EOLN(T1) WRITE(T2,C1) READLN(T1) WRITELN(T2) T B READ(T1,C1) C A

  12. F ASSIGN(T,’C:\H_DESKRIPSI.TXT’ RESET(T) Y EOF(T) CLOSE(T) T H WRITELN(T,TEMP) READLN(TEMP)

  13. SEKIAN