Na czym polega programowanie w TURBO Pascalu.

program nazwa;

{część opisowa}

begin

instrukcja_1;

instrukcja_2;

...

instrukcja_n;

end.

Przykład:

program pierwszy;

begin

writeln('Witaj Mirek');

end.

lub ze stałą:

program pierwszy;

const

imie = 'Mirek';

begin

writeln('Witaj ',imie);

end.

OPERACJE WEJŚCIA - WYJŚCIA DANYCH

Write oraz WriteLn - służy do wyprowadzanie wartości danych na ekran monitora

Write(argument_1, argument_2, argument_3, ...) lub WriteLn(argument_1, argument_2, argument_3, ...)

Read oraz ReadLn - służy do wprowadzania wartości danych

Read(zmienna_1, zmienna_2, zmienna_3, ...) lub ReadLn(zmienna_1, zmienna_2, zmienna_3, ...)

Zadania:

1. Napisz program wyświetlający Twoje imię i nazwisko.

2. Napisz program obliczający sumę dwóch podanych liczb.

3. Napisz program obliczający pole powierzchni prostokąta o bokach a i b.

4. Napisz program obliczający średnią arytmetyczną trzech liczb.

5. Napisz program obliczający wartość wyrażenia:

gdzie x jest dowolną liczbą rzeczywistą.

Sqr(a) - zwraca kwadrat swojego argumentu. np. sqr(3)=9

6. Napisz program obliczający wartość wyrażenia:

gdzie x jest dowolną liczbą rzeczywistą.

Sqrt(a) - zwraca pierwiastek stopnia drugiego z wyrażenia podanego jako argument. np. sqrt(16) =4

7. Napisz program obliczający pole powierzchni trójkąta, czworokąta oraz pięciokąta równobocznego.

Algorytmy z warunkami w Pascalu - instrukcja if - then - else.

INSTRUKCJA WARUNKOWA

if warunek then instrukcja_1

else instrukcja_2

np

if a<0 then writeln ('Podano ujemną wartość zmiennej a')

if (x>=10) and (x<=100) then writeln('x należy do przedziału ...');

if x>0 then writeln(`x jest dodatnie')

else writeln(`x jest ujemne')

Program 1. Napisz program który wyświetla większą z dwóch liczb całkowitych.

Program 2. Napisz program na znajdowanie wartości bezwzględnej liczby rzeczywistej.

Program 3. Napisz program, który wyświetla mniejszą z trzech liczb całkowitych.

Program 4. Dane są liczby rzeczywiste a i b będące współczynnikami równania ax+b=0. Napisz program

rozwiązujący to równanie.

podpowiedź:

Porównaj współczynnik A z liczbą zero:

- jeżeli różny od zera, to równanie posiada dokładnie rozwiązanie - wypisz rozwiązanie, a mianowicie wartość -B/A

- jeżeli równy zero, porównaj z zerem współczynnik B:

- jeżeli równy zero, to równanie jest tożsamością postaci 0=0

- jeżeli różny od zera, to równanie jest sprzeczne (np. 3=0)

Program 5. Napisz program obliczający pierwiastki równania kwadratowego o współczynnikach, a, b, c.

podpowiedź:

Program 6. Dane są liczby rzeczywiste a, b, i c. Napisz program, który stwierdzi czy liczby te mogą być

długościami boków trójkąta prostokątnego.

1. Wczytaj liczby A, B i C

2. Jeżeli A>0 i B>0 i C>0, to Jeżeli A2=B2+C2 lub B2=A2+C2 lub C2=A2+B2, to wypisz TAK

W przeciwnym wypadku wypisz NIE

3. W przeciwnym wypadku wypisz NIE

4. Zakończ

Program 7. Napisz program badający, czy wpisana przez użytkownika liczba jest parzysta.

Program 8. Napisz program, który dla zadanych liczb: liczby rzeczywistej x oraz liczby n równej 2,3,4,5, liczący x do potęgi n.

Program 9. Napisz program obliczający dla zadanej długości promienia, obwód i pole koła - z kontrolą poprawności wprowadzanych danych.

Program 10. Napisz program, który dla zadanego numeru miesiąca w 2008 roku ma podawać ilość dni w tym miesiącu (np. 1 - 31dni)

Program 11. Napisz program, który wczytuje długości odcinków a, b, c trzech odcinków. Jeśli któraś wartość jest liczbą mniejszą od zera, program wyświetla komunikat o błędzie danych wejściowych. W przeciwnym wypadku program wyświetla jeden z komunikatów: „z tych odcinków można zbudować trójkąt” lub „z tych odcinków nie można zbudować trójkąta”.

Program 12.Napisz program, który wczytuje współrzędne punktu (x,y) i wyświetla jeden z komunikatów: „punkt leży w … ćwiartce” lub „punkt leży na osi …”

---