program nazwa;
.
. deklaracje
.
begin
.
. instrukcje (część
wykonywalna programu)
.
end.
Ćwiczenie 1. Program Powitanie.
KOD
{$APPTYPE CONSOLE}
program Powitanie;
begin
writeln('Witaj w swiecie programowania');
readln;
end.
WYJŚCIE
Ćwiczenie 2. Procedura write.
KOD
{$APPTYPE CONSOLE}
program Powitanie;
begin
writeln('Witaj w swiecie programowania');
write('Nacisnij ENTER...');
readln;
end.
WYJŚCIE
Witaj
w swiecie programowania
Nacisnij
ENTER...
Ćwiczenie 3. Wstaw pusty wiersz pomiędzy procedurami writeln oraz write w programie z ćw. 2.
KOD
{$APPTYPE CONSOLE}
program Powitanie;
begin
writeln('Witaj w swiecie programowania');
writeln;
write('Nacisnij
ENTER...');
readln;
end.
WYJŚCIE
Witaj
w swiecie programowania
Nacisnij ENTER...
Ćwiczenie 4. Napisz program drukujący na ekranie wizytówkę z twoimi danymi osobowymi, np.:
**********************
Jan Kowalski
ul. Ładna 15
Wrocław
**********************
KOD
{$APPTYPE CONSOLE}
program Powitanie;
begin
writeln('**********************');
writeln(' Jan Kowalski');
writeln(' ul. Ladna 15');
writeln(' Wroclaw');
writeln('**********************');
readln;
end.
WYJŚCIE
**********************
Jan Kowalski
ul. Ladna 15
Wroclaw
**********************
Ćwiczenie 5. Wstawianie komentarzy wierszowych i blokowych.
{
to jest komentarz blokowy;
może zajmować dowolną liczbę linii
}
// to jest przykład komentarza
wierszowego
Całkowite typy danych – implementacje
Delphi
Typ Zakres Format
Shortint -128
.. 127 signed
8-bit
Smallint -32768
.. 32767 signed
16-bit
Integer -2 147 483 648 .. 2 147 483 647 signed
32-bit
Longint -2 147
483 648 .. 2 147 483 647 signed
32-bit
Int64 -263
.. 263-1 signed
64-bit
Byte 0
.. 255 unsigned
8-bit
Word 0
.. 65535 unsigned
16-bit
Cardinal 0 .. 4 294
967 295 unsigned
32-bit
Longword 0
.. 4 294 967 295 unsigned 32-bit
Ćwiczenie 6. Zadeklaruj zmienną całkowitą, przypisz jej wartość i wyświetl ją na ekranie.
KOD
program Zmienne;
{
To jest przykład
komentarza blokowego.
Możemy go stosować w
każdym miejscu naszego programu. Ta uwaga dotyczy także komentarza
wierszowego, który prezentowany jest
poniżej w programie.
Zadaniem programu o nazwie
'Zmienne' jest utworzenie (zadeklarowanie) zmiennej 'a', a następnie
przypisanie jej wartości 5 i wydrukowanie na ekranie.
}
{$APPTYPE CONSOLE}
var
a: integer; //deklaracja zmiennej całkowitej
'a'
begin
a:=5; //przypisanie
zmiennej 'a' wartości 5
writeln('a = ',
a); //drukuje
wartość zmiennej 'a' na ekranie
readln;
end.
WYJŚCIE
a = 5
Ćwiczenie 7. Zadeklaruj (utwórz)
zmienną całkowitą a, b oraz c, nadaj
wartości zmiennym a, b
a następnie przypisz
sumę a + b do zmiennej c.
KOD
program Suma_zmiennych;
{$APPTYPE CONSOLE}
var
a :
integer;
b :
integer;
c : integer;
begin
a := 5;
b := 7;
c := a + b;
writeln('a=', a, ' b=', b, ' c=', c);
readln;
end.
WYJŚCIE
a=5 b=7 c=12
Ćwiczenie 8. Napisz program wczytujący z klawiatury twój wiek.
KOD
program Wczytywanie_wieku;
{$APPTYPE CONSOLE}
var
wiek : byte; //wiek osoby należy zdecydowanie do
przedziału 0..255; zajmuje tylko 1 bajt
begin
write('Podaj swoj
wiek: ');
readln(wiek);
writeln;
writeln('Masz ',
wiek, ' lat.');
readln;
end.
WYJŚCIE
Podaj
swoj wiek: 27
Masz
27 lat.
