Kurs Pascal'a część1


      Napiszemy program, który będzie liczył sumę i różnicę dwóch wprowadzonych liczb całkowitych.


PROGRAM liczydlo;

{Instrukcja tam umożliwia wpisanie nazwy programu *}

USES crt;

VAR {Instrukcja, w której zadeklarujemy rodzaj zmiennych **}

liczba_1, liczba_2: : integer;

{Dwie liczby , na których będziemy wykonywać działania to liczby całkowite. Średnik na końcu.}

BEGIN

write ('Podaj pierwsza liczbe => ');

readln(liczba_1);

{Polecenie dla programu - czytaj oraz zapamiętaj to co wpisał użytkownik. Proszę zwrócić uwagę, że to polecenie jest trochę inne: READLN, a nie READ. Dodanie do polecenia: WRITE oraz READ końcówki LN powoduje przejście do kolejnego wiersza.}

write('Podaj druga liczba =>');

readln(liczba_2);

writeln('Suma dwoch liczb wynosi: ',liczba1+liczba2,' a ich roznica: ',liczba1-liczba2);

{Polecenie dla programu by wpisał tekst (to co w nawiasie i w apostrofach). Program ma wykonać dwa działania. Pierwszą część zdania oddzielamy przecinkiem i polecamy, by program wykonał działanie na dwóch liczbach całkowitych. Działanie oddzielamy przecinkiem i w apostrofach wpisujemy dalszą część zdania.}

readln;

END.






{* - zmienne są to wartości jeszcze niezadeklarowane podczas włączania programu, ale dopiero w trakcie jego działania}

{** - UWAGA! Nazwę należy wpisać bez nazwy i jak każde inne polecenie musi być zakończone średnikiem}





Kliknij aby zobaczyć źródło programu - program2.pas

Kliknij aby zobaczyć gotowy program - program2.exe


Maciej Kunowski



[ Poprzednia strona ]     [ Następna strona ]

______________________________ 031 ______________________________

Copyrigt(C) '2001 Maciej Kunowski