Skocz do zawartości
Majkelnajt

Pascal problem kodu

Rekomendowane odpowiedzi

Witam chciałem zrobić coś w stylu chaterbota i napisałem coś takiego

 

USES CRT;

VAR
imie:string;
a:string;
b:string;
c:string;

BEGIN
clrscr;
writeln('   Jak masz na imiŠ?');
read(imie);
writeln('A ja jestem MAJKEL');
writeln('MAJKEL: I co tam u ciebie ',imie,' sˆycha†');
write('',imie,': ');
read(a);
if a='nic' then writeln('MAJKEL: Nic a jak tam  w szkole');
if a='g˘wno'or a='jajco' or a='jajko' then writeln('MAJKEL: Chyba twoje ',a,'!');
if a='wypierdalaj' or a='spierdalaj' or a='ty huju' or a='ty pojebie' or a='ty dziwko' then writeln('MAJKEL: Lepszych sˆ˘w nie masz kutasie!!!');
write('',imie,');
read(B);
if b='hujowo' or b='do dupy' or b='zjebanie' then writeln('MAJKEL: M˘wisz ',b,,'');
if b='twoje' or b='chyba twoje' or b='twoje ciulu' or b='ty kutasie' then writeln('MAJKEL: SPIERDALAJ SOUND(4000);');
readln;

 

problem pojawia się tutaj if a='nic' then writeln('MAJKEL: Nic a jak tam w szkole');

if a='g˘wno'or a='jajco' or a='jajko' then writeln('MAJKEL: Chyba twoje ',a,'!');

if a='wypierdalaj' or a='spierdalaj' or a='ty huju' or a='ty pojebie' or a='ty dziwko' then writeln('MAJKEL: Lepszych sˆ˘w nie masz kutasie!!!');

gdy chce odpowiedzieć program się wyłancza jeżeli ktoś umie poprawić z góry dzięki

 

Zamykaj kod w znaczniki [ code ], wtedy się dużo wygodniej czyta.

Marmot.

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Zamknij to w pętlę repeat until lub while, to chyba logiczne ;p . Tylko przerób jakoś ten kod, żebyś mógł dalej rozmawiać, bo w obecnej postaci to to raczej nie da zamierzonych wyników nawet po zamknięciu w pętlę.

 

EDIT: Chociaż nie, dałoby się, ale to sobie sam pokombinuj, bo pętle to podstawy :P .

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Ja bym dał na początku zmienną jakąś, np var shit:boolean; potem ustawił shit:=false; a potem wszystko wsadził w while shit=false...

Udostępnij tego posta


Odnośnik do posta
Udostępnij na innych stronach

Jeśli chcesz dodać odpowiedź, zaloguj się lub zarejestruj nowe konto

Tylko zarejestrowani użytkownicy mogą komentować zawartość tej strony.

Zarejestruj nowe konto

Załóż nowe konto. To bardzo proste!

Zarejestruj się

Zaloguj się

Posiadasz już konto? Zaloguj się tutaj.

Zaloguj się tutaj

  • Przeglądający   0 użytkowników

    Brak zarejestrowanych użytkowników, przeglądających tę stronę.

×