Laboratoriniai darbai

Duomenų kodavimas - dekodavimas 4 Laboratorinis darbas

9.2   (3 atsiliepimai)
Duomenų kodavimas - dekodavimas 4 Laboratorinis darbas 1 puslapis
Duomenų kodavimas - dekodavimas 4 Laboratorinis darbas 2 puslapis
Duomenų kodavimas - dekodavimas 4 Laboratorinis darbas 3 puslapis
Duomenų kodavimas - dekodavimas 4 Laboratorinis darbas 4 puslapis
Duomenų kodavimas - dekodavimas 4 Laboratorinis darbas 5 puslapis
Duomenų kodavimas - dekodavimas 4 Laboratorinis darbas 6 puslapis
www.nemoku.lt
www.nemoku.lt
Aukščiau pateiktos peržiūros nuotraukos yra sumažintos kokybės. Norėdami matyti visą darbą, spustelkite peržiūrėti darbą.
Aprašymas

4-am Laboratoriniui darbui realizuoti pasirinkau Visual Basic 6.0 programavimo kalbą nes antrame kurse mes mokinomės šia kalbą ir man pasirodė tinkamiausia atlikti dėstytojo nurodytai užduočiai, renkantis iš objektinio programavimo kalbų.
Sukurta šifravimo sistema pateikta dėstytojui, kartu su šia ataskaita

Ištrauka

4-am Laboratoriniui darbui realizuoti pasirinkau Visual Basic 6.0 programavimo kalbą nes antrame kurse mes mokinomės šia kalbą ir man pasirodė tinkamiausia atlikti dėstytojo nurodytai užduočiai, renkantis iš objektinio programavimo kalbų.
Sukurta šifravimo sistema pateikta dėstytojui, kartu su šia ataskaita
Programos vaizdai
Pav 1 Programos printscreenas
Pav 2 Programos failai
Pav 3 Programos dalis kodo
Programos kodas
Dim a As String ‘Išskiriama nustatyta vieta tam tikram kintamajam
Dim b As String
Dim c As String
Dim d As String
Dim e As String
Dim f As String
Dim g As String
Dim h As String
Dim i As String
Dim j As String
Dim k As String
Dim l As String
Dim m As String
Dim n As String
Dim o As String
Dim p As String
Dim q As String
Dim r As String
Dim s As String
Dim t As String
Dim u As String
Dim v As String
Dim w As String
Dim x As String
Dim y As String
Dim z As String
Private Sub Command1_Click()‘ Apsirasomas pirmojo mygtūko „šifruoti“ kodas
a = "a" ‘a raidei priskiriama a reikšmė
b = "b"
c = "c"
d = "d"
e = "e"
f = "f"
g = "g"
h = "h"
i = "i"
j = "j"
k = "k"
l = "l"
m = "m"
n = "n"
o = "o"
p = "p"
q = "q"
r = "r"
s = "s"
t = "t"
u = "u"
v = "v"
w = "w"
x = "x"
y = "y"
z = "z"
Text2.Text = Text1.Text ‘ Text2 laukeliui su tekstu priskyriamas įvestas text1 laukelio tekstas
Text2.Text = Replace(Text2, a, "1") ‘Text2 laukeliui pakeiciama a reikšmė į 1 ir analogiškai padaroma su kitomis raidėmis.
Text2.Text = Replace(Text2, b, "2")
Text2.Text = Replace(Text2, c, "3")
Text2.Text = Replace(Text2, d, "4")
Text2.Text = Replace(Text2, e, "5")
Text2.Text = Replace(Text2, f, "6")
Text2.Text = Replace(Text2, g, "7")
Text2.Text = Replace(Text2, h, "8")
Text2.Text = Replace(Text2, i, "9")
Text2.Text = Replace(Text2, j, "/")
Text2.Text = Replace(Text2, k,...

Daugiau informacijos...

Šį darbą sudaro 711 žodžiai, tikrai rasi tai, ko ieškai!

Detali informacija
Darbo tipas
Laboratoriniai darbai
Lygis
Universitetinis
Failo tipas
Word failas (.doc)
Apimtis
6 psl., (711 ž.)
Peržiūrėti rašto darbą

Šis mokslo darbas pasitarnaus tau kaip puikus pavyzdys siekiant aukščiausio pažymio!

www.nemoku.lt Peržiūrėti darbą

www.nemoku.lt Panašūs darbai

Duomenų gavyba, Data mining

Duomenų gavyba, Data mining Informatika
Peržiūrėti darbą

Duomenų vaizdavimas kompiuteryje

Duomenų vaizdavimas kompiuteryje Informatika
Peržiūrėti darbą

Duomenų srauto stebėjimas

Duomenų srauto stebėjimas Informatika
Peržiūrėti darbą

Duomenų kaupikliai

Duomenų kaupikliai Informatika
Peržiūrėti darbą
Privalumai
Pakeitimo garantija Darbo pakeitimo garantija

Atsisiuntei rašto darbą ir neradai jame reikalingos informacijos? Pakeisime jį kitu nemokamai.

Sutaupyk 25% pirkdamas daugiau Gauk 25% nuolaidą

Pirkdamas daugiau nei vieną darbą, nuo sekančių darbų gausi 25% nuolaidą.

Greitas aptarnavimas Greitas aptarnavimas

Išsirink norimus rašto darbus ir gauk juos akimirksniu po sėkmingo apmokėjimo!

Atsiliepimai
www.nemoku.lt
Dainius Studentas
Naudojuosi nuo pirmo kurso ir visad randu tai, ko reikia. O ypač smagu, kad įdėjęs darbą gaunu bet kurį nemokamai. Geras puslapis.
www.nemoku.lt
Aurimas Studentas
Puiki svetainė, refleksija pilnai pateisino visus lūkesčius.
www.nemoku.lt
Greta Moksleivė
Pirkau rašto darbą, viskas gerai.
www.nemoku.lt
Skaistė Studentė
Užmačiau šią svetainę kursiokės kompiuteryje. :D Ką galiu pasakyti, iš kitur ir nebesisiunčiu, kai čia yra viskas ko reikia.
www.nemoku.lt Peržiūrėti darbą