- Honor Magic6 Pro - kör közepén számok
- iPhone topik
- Samsung Galaxy Watch7 - kötelező kör
- Yettel topik
- Telekom mobilszolgáltatások
- Milyen okostelefont vegyek?
- Google Pixel 8 Pro - mestersége(s) az intelligencia
- Apple iPhone 16 Pro - rutinvizsga
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Milyen hagyományos (nem okos-) telefont vegyek?
Új hozzászólás Aktív témák
-
zvaragabor
senior tag
válasz
RoyalFlush #2178 üzenetére
Jah értem. Megnézem akkor a kódokat. Köszi.
-
zvaragabor
senior tag
válasz
RoyalFlush #2176 üzenetére
Erre gondolsz?
"Mondjuk illett volna, ha már azt találta ki, hogy 0 megadását követően lépjen ki a program"Mert még nem vettünk olyat, hogy kilép egy adott valaminél.
-
[HUN]Zolee
őstag
válasz
RoyalFlush #2162 üzenetére
Kicsit sok az elágazás a programodba
Olyan excel-esen oldottad meg, ott kell mindig foglalkozni azzal hogy ha csak 1 érték van az adott tartománybaprogram szamok;
uses crt;
var n,osszeg,db,legkisebb,legkisebb_db,sorszam:real;
begin
clrscr;
osszeg:=0;
atlag:=0;
db:=0;
legkissebb:=0;
repeat
writeln('Kérem a számot: ');
read(n);
if n<>0 then
begin
osszeg:=osszeg+n;
db:=db+1;
if legkisebb>n then
begin
legkisebb=n ;
legkisebb_db=db;
end;
end;
until n=0;
if db>0 then
begin
writeln('A számok összege: ',osszeg);
writeln('A számok átlaga: ',osszeg/db);
writeln('A legkisebb szám a(z) ',legkissebb);
write('és a bekérés sorszáma: ',sorszam);
end;
end. -
Clairvoyance
csendes tag
válasz
RoyalFlush #2096 üzenetére
Annyira nem fontos, csak szebben nézne ki a program... tudsz rá megoldást?
Ui.: tudom, h grafikusba sokkal szebb egy program, viszont nem akarnám teljes képernyőssé tenni a progimat, grafikus mód meg tudtommal így müxik
Új hozzászólás Aktív témák
- 143 - Lenovo LOQ (15IRH8) - Intel Core i5-13500H, RTX 4060
- Dell Latitude E7440 - i5, 8GB RAM, HDMI, eu bill - számla, 6 hó garancia
- Bomba ár! Lenovo ThinkPad T450 - i5-5GEN I 8GB I 240SSD I 14" HD+ I Cam I W10 I Garancia!
- HIBÁTLAN iPhone 13 mini 128GB Pink -1 ÉV GARANCIA - Kártyafüggetlen, MS3050, 96% Akkumulátor
- BESZÁMÍTÁS! Intel Core i7 4790 4 mag 8 szál processzor garanciával hibátlan működéssel
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest