Hirdetés
- Xiaomi Mi 9 - egy híján
- One mobilszolgáltatások
- Apple iPhone 15 - a bevált módszer
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Honor 200 - kétszázért pont jó lenne
- Műholdas AI chippel fedné le a bolygót a Samsung
- Akciófigyelő: Megnyílt a Xiaomi hivatalos magyar webáruháza
- „Új mérce az Android világában” – Kezünkben a Vivo X300 és X300 Pro
- Megvásárolható a Vivo X300 és X300 Pro Magyarországon, íme a hivatalos árak
- Android alkalmazások - szoftver kibeszélő topik
Új hozzászólás Aktív témák
-
Balákka
tag
válasz
Csakénvagyok
#2358
üzenetére
kizárólag pascalban lehetett (házi volt a suliban)
de sikerült nagynehezen megoldani.
bevallom a filekezelés nem az erősségem
-
Balákka
tag
köszi

-
Balákka
tag
válasz
Csakénvagyok
#2354
üzenetére
de ahhoz kellene egy tömb amiben letárolom az összes rekordot nem?
-
Balákka
tag
segítségre lenne szükségem!
egy szótárprogramot kell készítenem amiben lehet keresni eszperantó szót, lehet keresni kifejezést, hozzáadni uj szót illetve törölni már meglévő kifejezést.
a problémát csak a törlés jelent nekem
hogyan lehetne törölni?
van egy txt fájlom amibe soronként van kifejezés tabulátorral elválasztva
pl: mano [chr(9)] kéz
és van egy dat fájl amit ebből a szöveges állománybol generáltam
ha tud valaki szivesen veszem ha ad ötletet

-
Balákka
tag
nekem a harmadik feladatra a megoldásom:
_____________________________________________________________________
program harmas;
uses crt;
var a,b:integer;
function hatv(alap:integer;kitevo:integer):longint;
begin
hatv:=1;
for cv:=1 to kitevo do begin
hatv:=hatv*alap;
end;
end;
begin
clrscr;
writeln('kérem az alapot');
readln(a);
writeln('kérem a kitevőt');
readln(b);
writeln(hatv(a,b));
readln;
end.
______________________________________________________________________én free pascalban fordítottam a programot, lehet eltérés turbo pascalban ha hiba van szolj és megpróbálok segíteni

Új hozzászólás Aktív témák
- AMD Gamer PC Ryzen 7 5800x RX 6600XT
- 1 TB 2230 M.2 PCI-E NVME SSD BAZÁR - Samsung, SK Hynix, Micron, WD - STEAM DECK
- 512GB 2230 M.2 PCI-E NVME SSD BAZÁR - Samsung, SK Hynix, Micron, WD - STEAM DECK
- Lexar NM1090 PRO 4TB M.2 NVME PCI-E 5.0 x4 - Új - 14.000-13.000 MBs - Eladó!
- Lexar NM790 2TB M.2 NVME PCI-E 4.0 x4 - Új - 7400-6500 MBs - Eladó!
- Keresek Xbox Series S / Series X / Playstation 5 konzolokat
- Lenovo ThinkBook 16 G6 Ryzen 7 7730U 16GB 768GB SSD FHD+ 1 év garancia
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7800X3D 32/64GB RAM RTX 5070 12GB GAMER PC termékbeszámítással
- GYÖNYÖRŰ iPhone 13 mini 256GB Midnight -1 ÉV GARANCIA -Kártyafüggetlen, MS3623, 94% Akkumulátor
- REFURBISHED - DELL Precision Dual USB-C Thunderbolt Dock - TB18DC
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest




