Hogyan kell ezt megcsinálni Free Pascalban?
Ezt a feladatot kell megcsinálnom.
Egészítsék ki a hiányzó 4-5 opciókkal a programot!
Lehetne ugy a 4-es feladatnál, hogy megkérdezze hogy tegyen-e szoközt a szavak közé?
válasza:Amugy meg nem igy kell.
Én irok be két stringet, és azt .. :) pl
writeln('Kére írja be az első stringet');
readln(szov1);
writeln('Kérem írja be a második stringet');
readln(szov2);
válasza:"Amugy meg nem igy kell.
Én irok be két stringet, és azt"
akkor ezt most meséld el a függvénynek, akit eredetileg se érdekel, hogy honnan kapja
szóval nem értem, vagy te nem érted (bocs de az utóbbi valószínűbb)
writeln('Kérem írja be az első stringet');
readln(szov1);
writeln('Kérem írja be a második stringet');
readln(szov2);
szoosz:=szov1+szov2;
writeln('A Szó összerakva ' , szoosz , ' ígynézki!');
igy jó?
válasza:Hát összerakta, de az a baj hogy nem jó :D
Olyant kellene, amin megkérdezi h legyen-e a szóköz köztük. :D Mit irjak még bele?
válasza: válasza:uses crt;
var
szov1,szov2,szoosz:string;
ch:char;
begin
clrscr;
writeln('Kére írja be az első stringet');
readln(szov1);
writeln('Kérem írja be a második stringet');
readln(szov2);
repeat
write('Legyen köztük szóköz? ');
ch:=(upcase(readkey));
until(ch=('I')) or(ch=('N'));
if ch='I' then
szoosz:=szov1+' '+szov2 else szoosz:=szov1+szov2;
writeln;
writeln('A Szó összerakva ' , szoosz , ' ígynézki!');
readln;
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!