Z racji zapisania się i uczęszczania do szkoły zaocznej o profilu informatycznym zacząłem naukę programowania ;) . Cóż, co prawda nauka ta opiera się póki co na Pascalu, ale jak to powiedział nauczyciel – jest przestarzały, jest nieużywany, ale jest na egzaminie ;) .
W sumie spodziewałem się czegoś trudniejszego po programowaniu, sam nie mogłem się nigdy do tego zabrać, zawsze coś wychodziło nie tak więc przestawałem się uczyć. Tym razem… nie dość, że poza algorytmami wszystko zaczęło mi się podobać, to nie zapowiada się na zmianę.
A co więcej? Generalnie fajnie jest, wreszcie uczę się czegoś, czego chcę, a nie bo muszę. Nauczyciele zarąbiści, z „jajem” – oby tylko tak pozostało i nic się nie zmieniło ;) .
Moja kariera opiera się już na dwóch programach, oba swą funkcjonalnością powalają po prostu :D . Program numer jeden, to:
program test;
uses crt;
begin
clrscr;
textcolor(1);
writeln(' Witam w moim programie ');
write(' Kolejny tekst ');
write(' nah.. ');
writeln;writeln;
readln;
end.
Natomiast drugi, nadzwyczaj rozbudowany, w którym uczyli nas obsługi zmiennych to:
program pierwsze_zmienne;
uses crt;
var
a : byte;
c : word;
hela : integer;
fd : longint;
begin
clrscr;
textcolor(2);
write(' Witaj w moim programie');
writeln;writeln;
textcolor(6);
write(' Podaj zmienna typu byte <0;255>: ');
readln(a);
textcolor(8);
write(' Podaj zmienn typu word <0;65535>: ');
readln(c);
textcolor(2);
write(' Podaj zmienn typu integer <-32768;32767>: ');
readln(hela);
textcolor(9);
write(' Podaj zmienn typu longint <podaj jakas liczbe rzeczywista;)>: ');
readln(fd);
writeln;writeln;
textcolor(11);
write(' By zakonyc nacisij <Enter> ');
readln;
end.
Już widzę, jak koncerny zaczynają walić drzwiami i oknami, by mnie zatrudnić :D .
Dodaj komentarz