Segíteni nekem vki programozásban?

Nem értem a problémát.

Írj b helyett 6-ot a programban és ne kérd be!

write('Kérem a "B"-t: ') ;

readln(b) ;

if b = 0 then write('Nullával való osztásnak nincs értelme!')

Ezt a három sort kitörlöd és a mod b helyett a mod 6-ot írsz?

Vagy a három sor helyére b=6; -ot?

program oszthatosag;

uses crt ;

var

szam,maradek : byte ;

begin

clrscr ;

write('Kérem a számot: ') ;

readln(szam) ;

maradek:=szam MOD 6;

IF maradek = 0 then writeln('Ez a szám osztható 6-al.')

else writeln('Ez a szám nem osztható 6-al.');

readln ;

end.

Hol tanulsz ismerős ez a feladat:)

program asd;

uses crt ;

var

a : integer ;

begin

clrscr ;

write('Kérem az "A"-t: ') ;

readln(a) ;

if a mod 6 = 0 then write('Osztoja')

else write('Nem osztoja');

readln;

end.

Elvileg így okés. Milyen fordítót használsz? Csak mert a Turbó-, Free- és BorlandPascal nem kedveli az ékezetes betűket és máshogy írja ki őket. Valamint ne lepődj meg ha teljesen logikus dolgokat nem szeret :) Többször jártam úgy hogy teljesen jó volt amit odaírtam de a program nem szerette.

Szerintem használj Borland Pascalt. Nagyon jó kis progi. Bár ha emelt infóra akarsz menni Pascallal akkor a Free Pascal-t kell megszoknod mert ott csak azt használhatod.

Itt egy letöltési link Borland Pascal-hoz.

Szólj ha nem jó.

[link]