-
Fototrend

Új hozzászólás Aktív témák
-
b05styp
tag
emberek kéne egy kis segítség. ha valaki ezt meg tudná nekem írni nekem akkor küldje el ide legyen szíves sürgős lenne: stipike@gmail.com,zsuzsanna.wenczl@gmail.com
GYAKORLÓ FELADAT
Kötelezo valamilyen saját készítésu függvényt használni! (Ha nincs függvény, a vizsga elégtelen.)
A feladat során számtömb létrehozása és használata javasolt.
Készítsen C nyelvu programot, amely képernyotörlés után megkérdezi a csoportlétszámot, mely egy 5 és 20 közé eso szám. A felhasználó beírja (Enter). Ha 5-nél kisebb, vagy 20-nál nagyobb számot ad meg, vagy betuket, a program írja ki: "Hiba!" és kérje be újra és újra. A "q" betu megadásakor viszont a program azonnal érjen véget.
Ezután kérje be egyenként az egyes emberek születési évét, "sorszámozott módon" (1. születési dátum, 2. születési dátum stb.). A felhasználó beírja (Enter). Ha 2010-nél nagyobb, vagy 1950-nél kisebb számot ad meg, vagy betuket, a program írja ki: "Hiba!" és kérje be újra és újra. A "q" betu megadásakor viszont a program azonnal érjen véget.
A program ezek után írja ki a csoport tagjainak átlagéletkorát (életkor=2010 mínusz a születési év). Az átlagéletkor törtszám, melyet 2 tizedesjeggyel írassunk ki.
Végül írja ki, hogy hány fo fiatalabb az átlagéletkornál és hány fo idosebb.
köszii
-
b05styp
tag
Üdv!
tegnap kaptam infó házit de nem bírok vele

a lényeg hogy beírok egy mondatot amiben 2 "jaj" szó van, és javítsa ki csak az első-t hajaj-ra.
eddigi kísérlezesésem:
program jaj;
{$APPTYPE CONSOLE}
var volt:boolean;
szo:string;
i:byte;begin
{ TODO -oUser -cConsole Main : Insert code here }
volt:=1>2;
writeln('írj egy mondatot!');
readln(szo);
for i:=1 to length(szo) do
if szo[i]='j' then
if szo[i+1]='a' then
if szo[i+2]='j' then
if szo[i+3]=' 'then
begin
szo[i]:=****nemtom mit kéne
volt:=1<2;
end;
end.
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- ASUS Xonar U7 USB 7.1 hangkártya
- HP Elitebook 850 - i5 proci / 16gb memória/ 500gb m2 SSD
- Gamer PC - R7 3800X, RTX 3060ti és 16gb RAM + GARANCIA
- SAMSUNG (LS43FM700UUXUF) 4K GAMER SAMART MONITOR! 2025 MODELL! AKCIÓ
- MSI Cubi NUC 1M Intel Core 7 150U 16GB DDR5 512 NVMe SSD 2x2.5GBE LAN Wifi 7 Win 11 Pro garancia
- HIBÁTLAN iPhone 14 Pro 256GB Gold -1 ÉV GARANCIA - Kártyafüggetlen, MS3919, 100% Akkumulátor
- HIBÁTLAN iPhone 13 mini 128GB Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3139, 100% Akkumulátor
- Xiaomi Redmi Note 9 / 4/128GB / Kártyafüggetlen / 12 Hó Garancia
- Nintendo switch oled, Új,Dobozával, 12 hónap garanciával
- Telefon felvásárlás!! Samsung Galaxy A13/Samsung Galaxy A33/Samsung Galaxy A53
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest



