pomooc s pascalom
Pre pridávanie komentárov sa musíte prihlásiť.
Pre pridávanie komentárov sa musíte prihlásiť.
Čo robiť, ak mi TabGroups nefunguje, aj keď som už aktualizoval na FF 138?
Zdroj: https://www.mozilla.org/en-US/firefox/138.0/releasenotes/
video sa venuje rozdielom v teplovodivých pastách, ako sa teplovodivá pasta vyrába, dobrým a zlým tepelnoizolačným materiálom a ďalším témam, a to všetko o chladení procesorov a grafických kariet.
Zdroj: Gamer Nexus
13. apríla 2025 bola vydaná verzia MX linux 23.6
Zdroj: Mx linux blog
Tretí ročník Bratislava OpenCamp sa uskutoční už túto sobotu na FIIT STU. Registrácia účastníkov prebieha online a účasť je bezplatná.
Zdroj: Bratislava OpenCamp
Tablet PineTab-V od spoločnosti Pine64 sa teraz dodáva s vylepšeným hardvérom a operačným systémom založeným na linuxovej distribúcii Debian.
Zdroj: liliputing.com
Zúčastnite sa open sourcovej konferencie v oblasti správy a riadenia identít (identity governance and administration), kde na vás čakajú zaujímavé workshopy, prednášky a networking s industry expertami v rámci komunity.
Vyšlo „paralelné vydanie“ (nie úplná aktualizácia) verzie AV Linux MX Edition.
Zdroj: AV Linux
Priatelia želám Vám do Nového roku 2025 všetko dobré, nech sa Vám vo svete Linuxu darí a z mojej strany ďakujem všetkým, ktorí akýmkoľvek spôsobom prispievajú na tento web. Či sú to už správy o zaujímavých novinkách, komentáre v diskusiách alebo blogy, ktoré niekedy zaberú aj pol dňa klepania na úkor svojho času. O to väčšia vďaka, PF 2025.
3. ročník Bratislava OpenCamp sa uskutoční 5. 4. 2025
Po covidových rokoch a ďalších prekážkach je pred nami tretí ročník, ktorý sa uskutoční v apríli 2025 na FIIT STU v Bratislave. Prvý aj druhý ročník konferencie sa tešil účasti okolo 300 ľudí, veríme že tretí ročník bude ešte lákavejší.
Zdroj: Bratislava OpenCamp
Aj v roku 2025 sa v Bruseli uskutoční podujatie "Free and Open source Software Developers’ European Meeting" (FOSDEM). Viac na jeho stránkach.
Zdroj: https://fosdem.org/2025/
Ak sa vám táto stránka páči, môžete nás podporiť tak, že si na vaše stránky umiestnite tento banner.
Náš Twitter tag je #LinuxOSsk
a potom ked sa budes nudit pre realne :) lebo nejako tusim riesenie len neviem jak to napisat v pascale:)
{tlac vystupov}
assign (subor,'vystupy.txt');
rewrite (subor);
uses crt;
var
y:real;
x:integer;
subor:text;
begin
assign(subor,'C:\tp7\blablabla');
rewrite(subor);
while(true) do begin
write('Zadaj X (0 ukonci program): ');
readln(x);
if(x=0) then break;
if(x mod 10=0) then begin
y:=(3-1.8*x)/x;
writeln('Y = ',y:2:4);
end else begin
writeln('X sa nekonci nulou, takze smola.');writeln(subor,y:2:4);
end;
end;
end.
takto by to mohlo byt nie?
program PocitajNieco;
uses crt;
var
y:real;
x:integer;
subor:text;
begin
assign(subor,'C:\tp7\blablabla');
rewrite(subor);
while(true) do begin
write('Zadaj X (0 ukonci program): ');
readln(x);
if(x=0) then break;
if(x mod 10=0) then begin
y:=(3-1.8*x)/x;
writeln('Y = ',y:2:4);writeln(subor,y:2:4);
end else begin
writeln('X sa nekonci nulou, takze smola.');
end;
end;
end.
uses crt;
var
y:real;
x:integer;
subor:text;
begin
assign(subor,'C:\tp7\blablabla');
rewrite(subor);
while(true) do begin
write('Zadaj X (0 ukonci program): ');
readln(x);
if(x=0) then break;
if(x mod 10=0) then begin
y:=(3-1.8*x)/x;
writeln('Y = ',y:2:4);
end else begin
writeln('X sa nekonci nulou, takze smola.');writeln(subor,y:2:4);
end;
end;
end. Takto to ma bit je to uz tu ale len potvrzujem :P
close(subor);
end.
vpis naprikladreadln;
a program ukoncit stlacenim enteru.vsakze ty s linuxom nemas nic spolocne ;)
skusila som tam dat to readln; a nic to nerobi..inac som robila toto:
program PocitajNieco;
uses crt;
var
y:real;
x:integer;
subor:text;
begin
assign(subor,'C:\tp7\blablabla');
rewrite(subor);
while(true) do begin
write('Zadaj X (0 ukonci program): ');
readln(x);
if(x=0) then break;
if(x mod 10=0) then begin
y:=(3-1.8*x)/x;
writeln('Y = ',y:2:4);writeln(subor,y:2:4);
end else begin
writeln('X sa nekonci nulou, takze smola.');
end;
end;
end.
exited with
exitcode = 3