abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
AbcLinuxu hledá autory!
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
včera 23:45 | Zajímavý software

Na blogu Qt bylo představeno Qt 3D Studio. Jedná se o produkt dosud známý pod názvem NVIDIA DRIVE™ Design Studio. NVIDIA jej věnovala Qt. Jedná se o několik set tisíc řádků zdrojového kódu. Qt 3D Studio bude stejně jako Qt k dispozici jak pod open source, tak pod komerční licencí. Ukázka práce s Qt 3D Studiem na YouTube.

Ladislav Hagara | Komentářů: 0
včera 17:50 | Komunita

Nadace The Document Foundation (TDF) zastřešující vývoj svobodného kancelářského balíku LibreOffice slaví 5 let od svého oficiálního vzniku. Nadace byla představena 28. září 2010. Formálně byla založena ale až 17. února 2012.

Ladislav Hagara | Komentářů: 0
včera 12:50 | Komunita

Mozilla.cz informuje, že dosud experimentální funkce Page Shot z programu Firefox Test Pilot (zprávička) se stane součástí Firefoxu. Page Shot je nástroj pro vytváření snímků webových stránek. Umí výběr oblasti, prvku stránky (např. odstavce), nebo uložení snímku celé stránky. Snímky lze ukládat na disk nebo nahrávat na server Mozilly. Nedávno bylo oznámeno, že se součástí Firefoxu stane Activity Stream.

Ladislav Hagara | Komentářů: 10
včera 04:10 | Nová verze

Po 10 týdnech vývoje od vydání Linuxu 4.9 (zprávička) oznámil Linus Torvalds, mj. již 20 let žijící v USA, vydání Linuxu 4.10 (LKML). Přehled nových vlastností a vylepšení například na Kernel Newbies a v Jaderných novinách (1, 2 a 3). Kódové jméno Linuxu 4.10 je Fearless Coyote.

Ladislav Hagara | Komentářů: 6
19.2. 15:55 | Zajímavý projekt

Vyzkoušet si příkazy a vyřešit několik úkolů lze na stránkách Commandline Challenge (CMD Challenge). Úkoly lze řešit různými způsoby, důležitý je výsledek. Zdrojové kódy jsou k dispozici na GitHubu pod licencí MIT.

Ladislav Hagara | Komentářů: 18
18.2. 17:35 | Bezpečnostní upozornění

Německá Bundesnetzagentur (obdoba českého ČTU) zakázala na německém území prodej panenky Cayla kvůli „špionáži“ dětí. Tato elektronická hračka obsahuje mikrofon, reproduktor a kameru a bezdrátové komunikační rozhraní, pomocí kterého se hračka připojuje na servery výrobce. Takovýmto způsobem může hračka pomocí umělé inteligence „odpovídat“ na dotazy dítěte. Hlavní problém bude ale asi někde jinde, podle prvotních zpráv může

… více »
Petr Tomášek | Komentářů: 31
17.2. 15:30 | Bezpečnostní upozornění

CSIRT.CZ upozorňuje, že bezpečnostní experti objevili nový typ malwaru, jenž cílí na open source e-commerce platformu Magento. Malware je zajímavý tím, že se jedná o první svého druhu, jehož kód zůstává skrytý v SQL databázi zasaženého e-shopu. Škodlivý kód je volán pomocí tzv. SQL trigerru, který je spouštěn při každém vytvoření objednávky v systému.

Ladislav Hagara | Komentářů: 3
17.2. 09:00 | Nová verze

Bylo vydáno Ubuntu 16.04.2 LTS, tj. druhé opravné vydání Ubuntu 16.04 LTS s kódovým názvem Xenial Xerus. Přehled novinek v poznámkách k vydání a v přehledu změn.

Ladislav Hagara | Komentářů: 57
17.2. 06:00 | Zajímavý článek

Pavel Tišnovský se v dvoudílném článku na MojeFedora.cz věnuje tvorbě pluginů (modulů) pro bitmapový grafický editor GIMP. Pomocí pluginů lze GIMP rozšiřovat o další funkce. Implementovat lze například nové filtry nebo pomocné utility pro tvorbu animací či poloautomatickou retuš snímků.

Ladislav Hagara | Komentářů: 6
16.2. 23:32 | Komunita

Do 30. března se lze přihlásit do dalšího kola programu Outreachy, jehož cílem je přitáhnout do světa svobodného a otevřeného softwaru lidi ze skupin, jež jsou ve světě svobodného a otevřeného softwaru málo zastoupeny. Za 3 měsíce práce, od 30. května do 30. srpna 2017, v participujících organizacích lze vydělat 5 500 USD. Jedná se již o 14. kolo tohoto programu.

Ladislav Hagara | Komentářů: 11
Jak se stavíte k trendu ztenčování přenosných zařízení (smartphony, notebooky)?
 (13%)
 (2%)
 (71%)
 (3%)
 (10%)
Celkem 670 hlasů
 Komentářů: 54, poslední dnes 07:38
Rozcestník
Reklama

Dotaz: Caesarova sifra s pouzitim pole (Visual Basic)

7.6.2013 12:14 Virteal | skóre: 4
Caesarova sifra s pouzitim pole (Visual Basic)
Přečteno: 806×
Dobry den, zasekl jsem se na jedne veci a uz 2 dny nevim, jak dal, proste se nemam koho zeptat a fantazie moc nepomohla. Pisu jeden programek, ktery ma zasifrovat text pomoci Caesarovy sifry. Formular se sklada z jednoho Comboboxu, dvou Textboxu (do jednoho se zada text a v druhem se objevi bud zasifrovany nebo rozsifrovany text, podle toho, jaka akce se zada v comboboxu) a tlacitka "Proved". Kod vypada takto:

Public Class Form1

Dim abeceda() = {"a", "b", "c", "d", "e", "f", "g", "h", "ch", "i", "j", "k", "l", "m", "n", "o", "p", "q", "r", "s", "t", "u", "v", "w", "x", "y", "z"}

Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged

End Sub

Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox3.TextChanged

End Sub

Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If ComboBox1.SelectedItem = "Zašifruj" Then For Next

ElseIf ComboBox1.SelectedItem = "Rozšifruj" Then For Next

Else : MsgBox("Nevybrali jste akci.") End If End Sub End Class

Je mi jasny, ze prepocet jednotlivych pismen v textu na pismena nachazejici se v abecede o 3 mista dale docilim pomoci pole, jednoduse vytvorim pole s abecedou, v poli se mi najde prvni pismeno v textu a posune se o 3 mista dale. Pak se preskoci na druhe pismeno v retezci, najde se v abecede a znovu se posune a tak se to opakuje do doby, nez je zasifrovany cely text. V tomto pripade musim vyuzit cyklus, ktery bude prechazet na dalsi pismena v textu. Jenze netusim, jak s textem v textboxu 2 pracovat jako s jednotlivymi pismeny, jak to prevest? Jak mam s tim textem zadanym do textboxu 2 pracovat?

Odpovědi

7.6.2013 12:25 Kit
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Visual Basic)
Jako indexy pole používej vstupní znaky. Jako hodnotu ulož požadované výstupní znaky.
7.6.2013 12:51 DarkKnightCZ | skóre: 12
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Visual Basic)

respektive pokud nepodporuje visualbasic jine nez ciselne indexy, tak pouzij ascii hodnotu znaku (treba stylem znak - 'a', at ty indexy jsou od nuly)

xkucf03 avatar 8.6.2013 11:12 xkucf03 | skóre: 45 | blog: xkucf03
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Přílohy:
Visual Basic je mrtvá technologie, na to bych se vykašlal.

Tady máš program napsaný v Javě.
Mám rád, když se lidé přou, znamená to, že vědí, co dělají, a že mají směr. Frantovo.cz, SQL-Výuka.cz, Nekuřák.net
8.6.2013 16:55 potato
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
A, zase jeden příznivce قلب...
xkucf03 avatar 8.6.2013 17:00 xkucf03 | skóre: 45 | blog: xkucf03
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Původně jsem mu to chtěl napsat v Perlu, ale tohle mi přišlo jednodušší a srozumitelnější. :-)

Případně můžu doporučit Qt/Quick/C++ (asi nejlepší technologie na GUI aplikace). Ale učit se dneska VB je IMHO ztráta času.
Mám rád, když se lidé přou, znamená to, že vědí, co dělají, a že mají směr. Frantovo.cz, SQL-Výuka.cz, Nekuřák.net
8.6.2013 22:28 potato
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Mi spíš šlo o to, zda je počeštění dostatečné a zda by obrozenci raději nečetl takovýto kód:
načti java.awt.GridLayout;
načti java.awt.HeadlessException;
načti java.awt.event.ActionEvent;
načti java.awt.event.ActionListener;
načti java.util.ArrayList;
načti java.util.Collections;
načti java.util.List;
načti javax.swing.JButton;
načti javax.swing.JFrame;
načti javax.swing.JLabel;
načti javax.swing.JTextField;

/**
 * @author Ing. František Kučera (frantovo.cz)
 */
veřejná třída Caesar rozšiřuje JFrame {

	důvěrné JTextField prostýText = nové JTextField();
	důvěrné JTextField šifrovanýText = nové JTextField();
	důvěrné JButton šifruj = nové JButton("Šifruj");
	důvěrné JButton dešifruj = nové JButton("Dešifruj");
	důvěrné stálé konečné char[] ABECEDA_ZNAKY = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789".toCharArray();
	důvěrné stálé konečné List<Character> ABECEDA;
	důvěrné stálé konečné int SKOK = 3;

	stálé {
		List<Character> abeceda = nové ArrayList<>();
		pro (char z : ABECEDA_ZNAKY) {
			abeceda.add(z);
		}
		ABECEDA = Collections.unmodifiableList(abeceda);
	}

	veřejné stálé prázdné main(String[] args) {
		Caesar c = nové Caesar();
		c.setVisible(true);
	}

	veřejné Caesar() háže HeadlessException {
		setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
		setTitle("Caesarova šifra");
		setLocationRelativeTo(null);
		setLayout(nové GridLayout(3, 2));
		
		add(nové JLabel("Prostý text"));
		add(prostýText);

		add(nové JLabel("Šifrovaný text"));
		add(šifrovanýText);

		add(šifruj);
		add(dešifruj);

		šifruj.addActionListener(nové ActionListener() {
			@Override
			veřejné prázdné actionPerformed(ActionEvent e) {
				šifrovanýText.setText(posuň(prostýText.getText(), SKOK));
			}
		});

		dešifruj.addActionListener(nové ActionListener() {
			@Override
			veřejné prázdné actionPerformed(ActionEvent e) {
				prostýText.setText(posuň(šifrovanýText.getText(), -SKOK));
			}
		});

		pack();
	}

	důvěrné stálé String posuň(String text, int oKolik) {
		StringBuilder posunutý = nové StringBuilder(text.length());

		pro (char z : text.toCharArray()) {
			posunutý.append(posuň(z, oKolik));
		}

		vrať posunutý.toString();
	}

	důvěrné stálé char posuň(char znak, int oKolik) {
		int původníPozice = ABECEDA.indexOf(znak);

		pokud (původníPozice < 0) {
			vrať znak;
		} jinak {
			int nováPozice = (původníPozice + oKolik) % ABECEDA_ZNAKY.length;
			nováPozice = nováPozice < 0 ? ABECEDA_ZNAKY.length + nováPozice : nováPozice;
			vrať ABECEDA.get(nováPozice);
		}
	}
}
Jendа avatar 9.6.2013 17:11 Jendа | skóre: 73 | blog: Výlevníček | JO70FB
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Jsi tedy zastáncem přístupu, že by se proměnné, funkce a spol. měly při programování psát zásadně anglicky? Proč?
Vox agroferti, vox Dei.
9.6.2013 18:54 Radek Miček | skóre: 23 | blog: radekm_blog
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Lepší by byl nějaký jednodušší a pravidelnější jazyk typu esperanto. Kompilátor by pak mohl využívat a kontrolovat názvy identifikátorů případně i komentáře.
xkucf03 avatar 9.6.2013 18:05 xkucf03 | skóre: 45 | blog: xkucf03
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
  1. Je to nedůsledné (kde máš např. nový PolníSeznam<>() nebo BezhlaváVýjimka?)
  2. Takový programovací jazyk neexistuje.
  3. Napsat to česky mi přijde jako dobrý nápad, protože čtenář na první pohled vidí, co je můj program a naopak jaké názvy a klíčová slova pocházejí ze standardní knihovny a jazyka (což se hodí dvojnásob, když čteš kód v programovacím jazyce, který moc neznáš)
Mám rád, když se lidé přou, znamená to, že vědí, co dělají, a že mají směr. Frantovo.cz, SQL-Výuka.cz, Nekuřák.net
10.6.2013 14:12 potato
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
1. Ano. Pro ilustraci (a vyvolání reakcí) to zjevně stačilo takhle.

2. Preprocesor pro Javu umožňující psát takto je otázka hodiny práce.

3. Napsat to česky jednak vytváří zlozvyk, druhak vyžaduje při čtení přepínat kontext několikrát na řádku, takže to těžko pomáhá porozumění.
9.6.2013 19:25 Kit
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Pochybuji, že by tohle kompilátor Javy přeložil. Identifikátory však česky být mohou. Přečti si dokumentaci.
10.6.2013 14:06 potato
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Porouchaný detektor ironie?
10.6.2013 14:28 Kit
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Ne. Porouchaný detektor ironie na ironii.
Heron avatar 11.6.2013 16:36 Heron | skóre: 50 | blog: root_at_heron | Olomouc
Rozbalit Rozbalit vše Re: Caesarova sifra s pouzitim pole (Java)
Pobavilo :-D

Založit nové vláknoNahoru

Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

ISSN 1214-1267   www.czech-server.cz
© 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.