- Windows 7
- Anyagi katasztrófára figyelmezteti az Apple-t a brit média
- Bittorrent topik
- Hálózati / IP kamera
- Linux kezdőknek
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Synology NAS
- Az Intel a legmodernebb chipgyártó géppel előzheti meg az egész szektort
- A leépítések után egy vagyont költ a töltőhálózatára a Tesla
- Gmail
Új hozzászólás Aktív témák
-
Szeke
senior tag
-
(_Y_)
csendes tag
szóval szerintem az lehet a probléma, hogy nem vagy tisztában a jelölésekkel.
a helyes program:
var sz:integer;
begin
readln (sz; {a [] jelek helyett sima () zárójel kell}
if szam mod 2=0 then
writeln ('páros') {itt is elírtad a cuccost, de erre rájöttél volna}
else writeln ('páratlan')
readln;
end.
soxerencsét a további tanuláshoz -
LordEVon
csendes tag
hy mindenkinek.
szóval én kezdő vok ebben a turbo pascalban, de sztem gaben nem fogja érteni ezt az egészet ha nem magyarázza el neki valaki, vag ynem mutatja meg vki egy jó proggal.
én megírtam, nekem működi is.
leírom hogy néz ki nálam.
program szam;
uses crt;
var
x:integer;
Begin
clrscr;
write('kérem a számot ');
readln(x);
if x mod 2=0 then write('páros')
else write('páratlan');
readln;
End.
Nekem ez így működött, lehet h nagyon papírforma, meg mittom én, de működik és az a lényeg.
Nekem is lenne kérdésem. Hogy kell csinálni a tömbös(arrayos progokat?)
Üdv:Lev -
pazirezz
tag
hali...
lehet +oldották már a problémádat az "első" nevü progidban...de egy dolog biztos nem volt jo...:
nincs megadva, hogy a progyi melyik "unit"-ot használja...pl "uses crt;"
egy darabig olvastam a hozzászolásokat, senki nem irta ezt, csak hüjeségeket, hogy kisbetű, nagybetü...
na mind1...ez tutko hiba volt benne...
üdv.phttps://m.facebook.com/paZirez
Új hozzászólás Aktív témák
- HP Pavilion Laptop 14
- AKCIÓ! Szépségápolás, Haj - és Szakállápolási márkás gépek - BOLTI ÁR FELÉÉRT!
- Bomba! HP EliteBook 1040 G7 x360 Érintős Hajtogatós Ultrabook Tab 14" -70% i7-10710U 16/256 FHD LTE
- BONTATLAN Új Iphone 15 és 15 Plus 128-512GB 1év APPLE garancia gyári független Deák AZONNAL Átvehető
- BONTATLAN Új Iphone 13 128-512GB 1év hivatalos Apple garancia gyári független Deák Azonnal Átvehető.
- Samsung Galaxy S24 5G 128GB Dual SIM Onyx Black Gyárilag független Csere/beszámítás is!
- iPhone SE 2016 csomag
- Eladó iPhone 11 Pro 64 GB Space Gray független, hibátlan állapotú telefon, akku 80% + sok kiegèszítő
- EVGA 750 QG 750 wattos gold full moduláris táp dobozában minden tartozékkal
- Férfi bőrdzseki teljesen új állapotban baráti eladó
Állásajánlatok
Cég: Alpha Laptopszerviz Kft.
Város: Pécs
Cég: Ozeki Kft.
Város: Debrecen