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í
×
eParkomat, startup z ČR, postoupil mezi finalisty evropského akcelerátoru ChallengeUp!
Robot na pivo mu otevřel dveře k opravdovému byznysu
Internet věcí: Propojený svět? Už se to blíží...
dnes 15:00 | Zajímavý software

Stop motion je technika animace, při níž je reálný objekt mezi jednotlivými snímky ručně upravován a posouván o malé úseky, tak aby po spojení vyvolala animace dojem spojitosti. Jaký software lze pro stop motion použít na Linuxu? Článek na OMG! Ubuntu! představuje Heron Animation. Ten bohužel podporuje pouze webové kamery. Podpora digitálních zrcadlovek je začleněna například v programu qStopMotion.

Ladislav Hagara | Komentářů: 0
včera 21:21 | Nová verze Ladislav Hagara | Komentářů: 0
včera 11:44 | Zajímavý projekt

Na Indiegogo byla spuštěna kampaň na podporu herní mini konzole a multimediálního centra RetroEngine Sigma od Doyodo. Předobjednat ji lze již od 49 dolarů. Požadovaná částka 20 000 dolarů byla překonána již 6 krát. Majitelé mini konzole si budou moci zahrát hry pro Atari VCS 2600, Sega Genesis nebo NES. Předinstalováno bude multimediální centrum Kodi.

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

Byla vydána verze 4.7 redakčního systému WordPress. Kódové označením Vaughan bylo vybráno na počest americké jazzové zpěvačky Sarah "Sassy" Vaughan. Z novinek lze zmínit například novou výchozí šablonu Twenty Seventeen, náhledy pdf souborů nebo WordPress REST API.

Ladislav Hagara | Komentářů: 4
6.12. 12:00 | Zajímavý projekt

Projekt Termbox umožňuje vyzkoušet si linuxové distribuce Ubuntu, Debian, Fedora, CentOS a Arch Linux ve webovém prohlížeči. Řešení je postaveno na projektu HyperContainer. Podrobnosti v často kladených dotazech (FAQ). Zdrojové kódy jsou k dispozici na GitHubu [reddit].

Ladislav Hagara | Komentářů: 27
6.12. 11:00 | Bezpečnostní upozornění

Byly zveřejněny informace o bezpečnostní chybě CVE-2016-8655 v Linuxu zneužitelné k lokální eskalaci práv. Chyba se dostala do linuxového jádra v srpnu 2011. V upstreamu byla opravena minulý týden [Hacker News].

Ladislav Hagara | Komentářů: 2
5.12. 22:00 | Komunita

Přibližně před měsícem bylo oznámeno, že linuxová distribuce SUSE Linux Enterprise Server (SLES) běží nově také Raspberry Pi 3 (dokumentace). Obraz verze 12 SP2 pro Raspberry Pi 3 je ke stažení zdarma. Pro registrované jsou po dobu jednoho roku zdarma také aktualizace. Dnes bylo oznámeno, že pro Raspberry Pi 3 je k dispozici také nové openSUSE Leap 42.2 (zprávička). K dispozici je hned několik obrazů.

Ladislav Hagara | Komentářů: 6
5.12. 06:00 | Zajímavý software

OMG! Ubuntu! představuje emulátor terminálu Hyper (GitHub) postavený na webových technologiích (HTML, CSS a JavaScript). V diskusi k článku je zmíněn podobný emulátor terminálu Black Screen. Hyper i Black Screen používají framework Electron, stejně jako editor Atom nebo vývojové prostředí Visual Studio Code.

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

I letos vychází řada ajťáckých adventních kalendářů. QEMU Advent Calendar 2016 přináší každý den nový obraz disku pro QEMU. Programátoři se mohou potrápit při řešení úloh z kalendáře Advent of Code 2016. Kalendáře Perl Advent Calendar 2016 a Perl 6 Advent Calendar přinášejí každý den zajímavé informace o programovacím jazyce Perl. Stranou nezůstává ani programovací jazyk Go.

Ladislav Hagara | Komentářů: 10
3.12. 16:24 | Nová verze

Byla vydána Mageia 5.1. Jedná se o první opravné vydání verze 5, jež vyšla v červnu loňského roku (zprávička). Uživatelům verze 5 nepřináší opravné vydání nic nového, samozřejmě pokud pravidelně aktualizují. Vydání obsahuje všechny aktualizace za posledního téměř půldruhého roku. Mageia 5.1 obsahuje LibreOffice 4.4.7, Linux 4.4.32, KDE4 4.14.5 nebo GNOME 3.14.3.

Ladislav Hagara | Komentářů: 17
Kolik máte dat ve svém domovském adresáři na svém primárním osobním počítači?
 (32%)
 (24%)
 (29%)
 (7%)
 (5%)
 (3%)
Celkem 791 hlasů
 Komentářů: 50, poslední 29.11. 15:50
Rozcestník
Reklama

Dotaz: turbo pascal

21.1.2006 18:00 ginaaa
turbo pascal
Přečteno: 1311×
Ahojte vsetci, pomozte mi prosiiiim! Zacinam s Turbo Pascalom a nutne potrebujem odovzdat k polroku program, ktory nacita na obrazovku externy textovy subor (staci aby mal 2,3 riadky)...a potom aby nacital slova nie zlava doprava ako je zvykom ale zprava dolava. Snad to bude pre vas lahke no ja som uplny amater. Keby ste mi to niekto spravil, bol by ste moc hodni.

Diky moc

Odpovědi

21.1.2006 18:07 Robert Krátký | skóre: 94 | blog: Robertův bloček
Rozbalit Rozbalit vše Admin
a) Toto není vhodné fórum pro podobný dotaz. Řeší se tu problémy s GNU/Linuxem a FOSS.

b) Žádat, aby za tebe někdo vypracoval domácí úkol, to je dost ubohé. Proč by to měl někdo dělat? Ty ani nejevíš zájem o to, abys to pochopil, naučil se. Chceš jen práci hodit na jiné.
21.1.2006 18:13 Martin
Rozbalit Rozbalit vše Re: Admin
Nelze nez souhlasit... Zkus to na zive.cz :o)
21.1.2006 18:51 ginaaa
Rozbalit Rozbalit vše Re: Admin
To ja moc dobre vim a taky mam se zajem to naucit, budu to v maji potrebovat a aj to chcem vediet pre svoj dobry pocit. Ale zial to zatial neviem, skusala som citat navody k Pascalu a neviem to stale, a ked mas na vyber ze bud poziadas o pomoc cudzieho, alebo ti nedaju polrocne vysvedcenie, tak neviem co by si vybral ty...
21.1.2006 18:57 #Tom
Rozbalit Rozbalit vše Re: Admin
Neflákat se celou dobu a zavčas se učit. ;-)
21.1.2006 19:05 ginaaa
Rozbalit Rozbalit vše Re: Admin
No jo, budu se snazit polepsit, som sa o nieco aj snazila ale hlasi mi to Runtime error 104 at 0E09:0048! a vobec netusim co s tym...
21.1.2006 19:29 #Tom
Rozbalit Rozbalit vše Re: Admin
Nápověda: errors, run-time. A nebo ještě lépe - spouštět přímo v Turbo Pascalu. Jinak se hodí také Search|Find error....
21.1.2006 20:33 ginaaa
Rozbalit Rozbalit vše Re: Admin
Diky aj tebe za snahu, nieco mi ta napoveda dala a hlavne v buducnosti dufam da...
21.1.2006 18:15 #Tom
Rozbalit Rozbalit vše Re: turbo pascal
Na to by se dala použít procedura ReadLn, jako parametr by se jí mohl dát nějaký String. Rozsekání na slova se dá udělat pomocí funkcí Copy a Pos. Celé se to obalí třeba do cyklu while ... do, jako podmínka poslouží třeba nějaký Eof.

Turbo Pascal má dobře udělanou nápovědu se snadno pochopitelnými přiklady. Lze z ní i kopírovat. Spolu s pěkně udělaným uživatelským rozhraním to půjde snadno a rychle. ;-)
21.1.2006 20:14 machr
Rozbalit Rozbalit vše Re: turbo pascal
neco takovyho?
var
	f: text;
	s: string;
	i: integer;
begin
	assign(f, 'file.txt');
	reset(f);
	while not eof(f) do begin
		readln(f, s);
		for i := length(s) downto 1 do 
			write(s[i]);
		writeln();
	end;
	close(f);
end.
PS: nemam nainstalovanej prekladac pascalu, a uz sem v nem dost dlouho nedelal, takze to mozna bude chtit par uprav, aby to slo prelozit....
21.1.2006 20:32 ginaaa
Rozbalit Rozbalit vše Re: turbo pascal
Super, moc, moc si mi pomohol. Zda sa ze si este hodne vela z Pascalu pamatas. Diky ti moc!
Martin Tůma avatar 22.1.2006 01:11 Martin Tůma | skóre: 38 | blog: RTFM | Praha
Rozbalit Rozbalit vše Re: turbo pascal

Tohle ale obrací celý řádky, tzn vypíše to znaky v opačnym pořadí, což IMHO není to, co je úkolem... Podle mě je požadavkem toto:

input> toto je vstupní text
output> text vstupní je toto

Řešením je triviální lexikální analyzátor a zásobník. Realizaci už ale nechávám na čtenářovi ;-)

Každý má právo na můj názor!
22.1.2006 09:29 machr
Rozbalit Rozbalit vše Re: turbo pascal
to je jenom otazka interpretace. taky by se to dalo chapat treba takhle: ;-)
in: toto je vstupni text
out: otot ej inputsv txet
22.1.2006 09:44 machr
Rozbalit Rozbalit vše Re: turbo pascal
nevim, jestli si to zaslouzi pojmenovani lexikalni analyzator :-D

var
	f: text;
	s: string;
	i, p: integer;
	a: array[0..63] of string[63];
begin
	assign(f, 'file.txt');
	reset(f);
	while not eof(f) do begin
		readln(f, s);
		i := 0;
		while true do begin
			p := pos(' ', s);
			if p < 1 then break;
			a[i] := copy(s, 1, p-1);
			inc(i);
			delete(s, 1, p);
		end;
		write(s, ' ');
		for i := i-1 downto 0 do
			write(a[i], ' ');
		writeln();
	end;
	close(f);
end.

vim ze to neni moc efektivni....
tesi me na tom, ze sem tam pouzil muj oblibenej "cyklus s podminkou uprostred" :-D
22.1.2006 11:43 ginaaa
Rozbalit Rozbalit vše Re: turbo pascal
No presne som sa neopytala, ktoru verziu z vasich napadov chce...ale myslim, ze bude rad, ked vobec nieco odovzdam...ale myslim, ze ta prva machrova verzia staci. dik
22.1.2006 11:48 Peter Golis | skóre: 53 | Bratislava
Rozbalit Rozbalit vše Re: turbo pascal
za predpokladu ze ti ucitel sam neposkytol riesenie na tomto portali. alebo ze si ho tu uz nenasiel.
22.1.2006 11:49 ginaaa
Rozbalit Rozbalit vše Re: turbo pascal
jj, to by asi nebolo najlepsie, no bola to fakt nudza a som rada, ze vobec nieco odovzdam
22.1.2006 17:30 Peter Golis | skóre: 53 | Bratislava
Rozbalit Rozbalit vše Re: turbo pascal
ucitelia maju jednu vlastnost, dokazu odhadnut svojich ziakov a tym padom vedia ci danu ulohu nahodou nevypracoval niekto iny.
ten vtip, odkaz ocinovi ze Wolker bol Jiri a nie Jhonny, je zalozeny na pravde.
22.1.2006 17:33 VícNežNic | skóre: 42 | blog: Spáleniště | Ne dost daleko
Rozbalit Rozbalit vše Re: turbo pascal
Mrzí mě, že jsem si nepřečetl tu druhou větu, ale po té první jsem se musel moc smát, tak jsem se dál už nedostal :-)
Copak toho není dost?
22.1.2006 10:23 j
Rozbalit Rozbalit vše Re: turbo pascal
jasne! dalo by se to resit rekursivne
22.1.2006 11:47 Michal Kubeček | skóre: 71 | Luštěnice
Rozbalit Rozbalit vše Re: turbo pascal
Rekurze se dá vždy přepsat pomocí cyklu a zásobníku. Neuděláte-li to sám, udělá to za vás překladač… :-)
22.1.2006 13:59 j
Rozbalit Rozbalit vše Re: turbo pascal
No jasne, ale tu jde o zapis toho algoritmu, ktery je tak hodne jednoduchy.
5.2.2006 21:34 domelf
Rozbalit Rozbalit vše Re: turbo pascal
Custe, tak ja teda mam taky domaci ukol :-), ale potreboval bych pomoci s necim jinym. Jsem uplný laik co se tyce linuxu. Vlastnim MandrivaLinux2006 64x86 a chtel bych na tom nejakym zpusobem rozjet programovani v pascalu.Nevim kde zacit.Ve win jsem mel Borland Pascal a neco podobneho (s troufalosti) bych chtel mit i tu (ne pres wine).Rikam s troufalosti,pac nevim jestli to nebudu muset prekladat pres prikazovaj radek(coz by mi teda nevadilo).Nevim kam se kouknout po nejakym tom programku,tak mi nejak prosim poradte.Diky
5.2.2006 21:50 #Tom
Rozbalit Rozbalit vše Tak tohle už je úplně jiné téma, ale proč ne... :-)
Výběr je veliký:
  • DOSEMU
  • DOSBOX
  • MS-DOS/FreeDOS/jiný DOS v QEMU
  • MS-DOS/FreeDOS/jiný DOS ve VMWare.
5.2.2006 21:59 neal_cz | skóre: 29 | Neratovice
Rozbalit Rozbalit vše Re: turbo pascal
Free Pascal by měl být kompatibilní s Turbo Pascalem a snad i s Delphi. Součástí je IDE hodně podobné Turbo Pascalu. Binárky pro Linux, BSD, DOS, Windows a další.
DjAARA avatar 5.2.2006 22:01 DjAARA | skóre: 32 | Praha|Náklo|Olomouc
Rozbalit Rozbalit vše Re: turbo pascal
Podivej se na netu po fpc pripadne Lazarus.
5.2.2006 22:32 Peter Golis | skóre: 53 | Bratislava
Rozbalit Rozbalit vše Re: turbo pascal
kedysi bol gpc (GNU Pascal Compiler) sucastou gcc.
8.2.2006 08:33 domelf
Rozbalit Rozbalit vše turbo pascal
Diky moc za navrhy. Ten prvni mi prapadal jako emulatory coz sem na mysli nemel, ale diky moc. Nakonec jsem zjistil ze neco umi KDevelop.Jako spustit mi napsany program, jen musim jeste poresit jak se oteviraji jednotky v linuxu (ve win se na zacatek pise "uses wincrt" a tady nevim)
9.2.2006 00:57 domelf
Rozbalit Rozbalit vše Re: turbo pascal
Nechci na nikoho spechat :-), nainstaloval jsem fpc ale mam takovy problemek :-( mrknete mi prosim na nej? nevim si rady. Diky moc

--------------- cd '/home/dominik/pas/src' && fpc -vr pas.pp

Free Pascal Compiler version 2.0.2 [2005/11/26] for i386

Copyright (c) 1993-2005 by Florian Klaempfl

Target OS: Linux for i386

Compiling pas.pp

pas.pp:3: error: 3: Identifier not found "integet"

pas.pp:3: error: 10: Error in type definition

pas.pp:7: error: 14: Can't read or write variables of this type

pas.pp:7: error: 15: Illegal expression

pas.pp: error: 9: There were 4 errors compiling module, stopping

pas.pp: error: 9: Compilation aborted

Error: /usr/bin/ppc386 returned an error exitcode (normal if you did not specify a source file to be compiled)

*** Exited with status: 1 *** ---------------

pripadne kdybych mel neco upravit v ppc386, tak zase nevim jaky editor je binarni,opravdu si nevim rady mam v tom gulas.
9.2.2006 01:04 Radek Šlesinger | skóre: 13 | Adamov
Rozbalit Rozbalit vše Re: turbo pascal
pas.pp:3: error: 3: Identifier not found "integet"

Myslim, ze cely problem bude jenom tento preklep. Ten datovy typ je Integer.

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.