Pascal segítség?
A mellékelt módon deklarált változók egy-egy tanuló nevét és
jegyét tárolják. Írd meg azt a programrészletet, amely a
billentyűzetről beolvas az e1 és e2 változókba egy-egy nevet
és jegyet, majd kiírja a képernyőre annak a tanulónak a nevét,
akinek nagyobb a jegye. Ha a két jegy egyenlő, akkor az e1
változóban tárolt tanuló nevét kell kiíratni.
type tanulo=record
nev: string[20];
jegy: real
end;
var e1,e2:tanulo;
type tanulo=record
nev: string[20];
jegy: real
end;
var e1,e2:tanulo;
begin
writeln('Név1?');
readln('e1.nev');
writeln('jegye?');
readln(e1.jegy);
writeln('Név2?');
readln('e2.nev')
writeln('jegye?');
readln(e2.jegy);
if e1.jegy<e2.jegy then
writeln('e2.nev');
if e2.jegy<e1.jegy then
writeln('e1.nev');
if e1=e2 then
writeln('e1.nev');
end.
CSAK itthoni próbálkozás, 9.osztályos feladat
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!