Wayfire, kompozitní správce oken běžící nad Waylandem a využívající wlroots, byl vydán ve verzi 0.10.0. Zdrojové kódy jsou k dispozici na GitHubu. Videoukázky na YouTube.
Před necelými čtyřmi měsíci byl Steven Deobald jmenován novým výkonným ředitelem GNOME Foundation. Včera skončil, protože "nebyl pro tuto roli v tento čas ten pravý".
Nové číslo časopisu Raspberry Pi zdarma ke čtení: Raspberry Pi Official Magazine 156 (pdf).
Armbian, tj. linuxová distribuce založená na Debianu a Ubuntu optimalizovaná pro jednodeskové počítače na platformě ARM a RISC-V, ke stažení ale také pro Intel a AMD, byl vydán ve verzi 25.8.1. Přehled novinek v Changelogu.
Včera večer měl na YouTube premiéru dokumentární film Python: The Documentary | An origin story.
Společnost comma.ai po třech letech od vydání verze 0.9 vydala novou verzi 0.10 open source pokročilého asistenčního systému pro řidiče openpilot (Wikipedie). Zdrojové kódy jsou k dispozici na GitHubu.
Ubuntu nově pro testování nových verzí vydává měsíční snapshoty. Dnes vyšel 4. snapshot Ubuntu 25.10 (Questing Quokka).
Řada vestavěných počítačových desek a vývojových platforem NVIDIA Jetson se rozrostla o NVIDIA Jetson Thor. Ve srovnání se svým předchůdcem NVIDIA Jetson Orin nabízí 7,5krát vyšší výpočetní výkon umělé inteligence a 3,5krát vyšší energetickou účinnost. Softwarový stack NVIDIA JetPack 7 je založen na Ubuntu 24.04 LTS.
Národní úřad pro kybernetickou a informační bezpečnost (NÚKIB) spolu s NSA a dalšími americkými úřady upozorňuje (en) na čínského aktéra Salt Typhoon, který kompromituje sítě po celém světě.
Společnost Framework Computer představila (YouTube) nový výkonnější Framework Laptop 16. Rozhodnou se lze například pro procesor Ryzen AI 9 HX 370 a grafickou kartu NVIDIA GeForce RTX 5070.
Search|Find error...
.
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. 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....
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
in: toto je vstupni text out: otot ej inputsv txet
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.
Integer
.
Tiskni
Sdílej: