- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Xiaomi Mi 11 Ultra - Circus Maximus
- Bemutatkozott a Poco X7 és X7 Pro
- Bemutatkozott a Poco F2 Pro (már megint)
- Huawei Watch GT 6 és GT 6 Pro duplateszt
- Apple Watch Ultra - első nekifutás
- Samsung Galaxy S22 és S22+ - a kis vagány meg a bátyja
- Samsung Galaxy S25 - végre van kicsi!
- Okosóra és okoskiegészítő topik
- Apple iPhone 17 Pro Max – fennsík
Új hozzászólás Aktív témák
-
cucka
addikt
válasz
zvaragabor #2217 üzenetére
a for i:=1 to 10 ciklus belsejében elindítani egy for i:=1 to 10 ciklust az helyből rossz.
A program lényegi része ennyi. Mi általános iskola nyolcadik osztályában csináltunk ennyire egyszerű feladatokat. Igen, jól látod, egyáltalán nem kell semmilyen tömbben eltárolni a sorozatban beérkező számokat ahhoz, hogy összeadd őket.
writeln('Kérem a tíz tanuló születési évét:');
for i:=1 to 10 do
begin
readln(szul_evszam);
ossz:=ossz+10;
if (aktual-szul_evszam>18) then inc(felettidb);
end;
write('18 even feluliek: ',felettidb);
write('atlag: ',ossz/10;mod.
még egy javaslat: ha nem szeretnéd magad szivatni a jövőben (amikor nem 13 sor lesz a program), akkor igyekezz normális változóneveket kitalálni. Mindent nevezz el arról, amilyen adat van benne, pl. a vektort ne vektornak hívd, mert az nem mond semmit, helyette lehet a neve eletkorok, az aktualis évszámot hívhatod évszámnak, stb.
Új hozzászólás Aktív témák
- sziku69: Fűzzük össze a szavakat :)
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- PC Game Pass
- Szünetmentes tápegységek (UPS)
- Világ Ninjái és Kódfejtői, egyesüljetek!
- Xiaomi Mi 11 Ultra - Circus Maximus
- Warhammer 40k: Space Marine 2 (PC, PS, XO)
- Kínai és egyéb olcsó órák topikja
- YouTube
- Apple asztali gépek
- További aktív témák...
- Gigabyte RTX 4080 XTreme WaterForce 16GB GDDR6X Videokártya! BeszámítOK
- XBOX Series Shock Blue kontroller - Gar.: 2026.04 hó
- Mini PC - HP EliteDesk 800 G3 DM / i5-6500T / DDR4 / NVME M.2 / USB Type-C / több db / 27% számla
- 0perces! Samsung Galaxy Book5 Pro 360 2in1 Core Ultra 7 256V 16GB 1TB 16" WQXGA+ AMOLED TOUCH 1évgar
- NEUTRINO MINI HYPEX NC252MP 2x250W 4Ohm (2x150W 8Ohm) sztereó erősítő
- Eredeti Lenovo 300W töltők - ADL300SDC3A
- Telefon felvásárlás!! iPhone 11/iPhone 11 Pro/iPhone 11 Pro Max
- Wacom Bamboo One CTF-430 rajztábla
- HP EliteBook x360 1040 G8 i7-1185G7 32GB 512GB 2in1 1 év garancia
- LicencAruhaz.hu OLCSÓ, LEGÁLIS SZOFTVEREK AZONNAL - Windows - Office - Win Server - ÖRÖK GARANCIÁVAL
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: Laptopműhely Bt.
Város: Budapest