Hogy csináljam Lazarussal?
Olvasson be két egész számot, a nagyobbat ossza el a kisebbel, majd a hányadost és a maradékot írja ki.
Ez a házink, Lazarussal kell megcsinálnunk. Kérlek, segítsetek. előre is köszönöm
válasza:Fogalmam sincs, mit jelent a Console mód, még abszolút nem ismerem a programot. Amúgy eddig jutottam el, de még nem jó és hiányos is:
var a,b,c:integer;
begin
write('Kerem az elso szamot!'); readln(a);
writeln('Kerem a masodik szamot!'); readln(b);
c=(a/b);
readln;
end.
válasza:A console mód az, amikor "dos-os" ablakot készítesz, nem windowsosat gombokkal, beviteli mezőkkel. Szal most ez az lesz.
"Olvasson be két egész számot" tehát neked kell összehasonlítani és megcserélni ha b>a.
Ha a/b-t írsz, akkor törtszám (valós szám; real) lesz az eredmény, de ebben a feladatban egyész hányadost és maradékot kérnek. Ezeknek a neve 'div' és 'mod', google segítségével biztosan találsz rá jó példafeladatot.
válasza:ezt én így oldanám meg:
var i:boolean;
a,b,c:int64; // csak hogy tudjon nagy számokat is de lehet hogy elég a lonint vagy az integer is
begin
Writeln('Kérem az első számot');
Readln(a);
Writeln('Kérem a második számot');
if strtointdef(a,0)(nagyobb) strtointdef(b,0)
then begin
writeln (inttostr(a div b));
i:= true
end else
writeln (inttostr(b div a));
i:=true
if i= false then
writeln('Nem lehetett elosztani!');
end.
Kapcsolódó kérdések:
Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!