Dziś to jest kolejny dzień mojego programistycznego życia ;) . Poznaliśmy zmienną instrukcje if i od razu życie stało się piękniejsze, bo coś się wreszcie dziać zaczyna. Oczywiście nie mogło zabraknąć mojej weny twórczej podczas nauki; tym oto sposobem podczas nauki osiągnąłem pseudo blue screen’a ;) . Czemu pseudo? Ha, sami sobie zobaczcie.
program instrukcja_if; uses crt; begin textbackground(1); clrscr; textcolor(8); writeln;writeln; textcolor(15); write(' Blad 0x00000'); writeln(' Aplikacja explorer.exe'); writeln; writeln(' wykonala nieprzewidziana operacje'); writeln(' W celu unikniecia problemu zrestartuj komputer'); writeln;writeln; writeln(' Jesli tego nie zrobisz, to sledzik nie zniknie z naszej-klasy xD'); writeln(' Zrzucanie pamieci fizycznej'); writeln;writeln; readln; write(' By zakonczyc nacisnij <Enter>'); readln; end.
Takie wielkie nic zrobione na szybko ;) . Teraz tak myślałem nad wprowadzeniem zmiennych z instrukcji if właśnie, że jeśli da się tak, że ma się śledzika, to coś tam, a jeśli nie, to coś tam, ale mam ciekawsze zajęcie, o czym dalej.
To, co wyżej wkleiłem to zabawa, jak już wspomniałem poznaliśmy instrukcję if, a co się z tym wiąże? No oczywiście napisaliśmy swój skrypcik ;) .
program instrukcja_if; uses crt; var wiek : real; begin textbackground(1); clrscr; textcolor(7); writeln; write(' Podaj ile masz lat: '); readln(wiek); writeln; if ((wiek>130) or (wiek<=0)) then begin writeln;writeln; textcolor(12); write(' Jaja se robisz? Masz ' ,wiek:0:0,' lat?!'); writeln(' No, ale alkohol mozesz pic :D.'); end else begin writeln; write(' Masz ' ,wiek:0:0,' lat - luz, jestes normalny.'); if (wiek<18) then begin writeln;writeln; textcolor(14); write(' Nie mozesz pic alkoholu '); end else begin writeln;writeln; textcolor(11); write(' Mozesz chlac do upadlego'); end; end; writeln;writeln; textcolor(15); write(' By zakonczyc nacisnij <Enter>'); readln; end.
Co to robi? Ano wypluwa komunikaty. Jeśli ma ktoś powyżej 130 lat, to coś nie halo z nim, jeśli ma mniej niż 130, a zarazem więcej niż 18, to jest pełnoletni, a jeśli ma poniżej 18, to jest niepełnoletni. Proste.
I tym właśnie sposobem chciałbym napisać swój pseudo konwerter z systemu heksolidalnego do binarnego. Ale borykam się z dwoma myślami…
- Jaką zmienną podać? Real, string, czy po prostu rozpisywać, że 1 : 0001, itd.
- Jak zrobić, by ten program nie zamykał się po spełnieniu warunku.
- No i w sumie jeszcze jedna dość istotna. Nie wiem, jak zrobić, by można było zamienić np. ciąg 4CD2 z HEX na binarne.
Ach… początkującym programistą być to nie jest łatwa sprawa ;) .
> zmienną if
What.
Instrukcja if. Błąd ;) .