1.
program zmienne;
#include ( "stdlib.hhf" );
static
zmienna: int32 :=5;
wprowadzana: int32;
begin zmienne;
//wyświetl wartość zainicjowanej zmiennej
srdout.put ( "wartosc zmiennej zadeklarowanej wynosi: ", zmienna, NL);
//pobierz wartosc od uzytkownika i wyswietl ja
stdout.put ( "wprowadz liczbe calkowita: " );
stdin.get ( wprowadzana );
stdout.put ( "wprowadzono: ",wprowadzana, nl );
end zmienne;
#include ( "stdlib.hhf" );
static
zmienna: int32 :=5;
wprowadzana: int32;
begin zmienne;
//wyświetl wartość zainicjowanej zmiennej
srdout.put ( "wartosc zmiennej zadeklarowanej wynosi: ", zmienna, NL);
//pobierz wartosc od uzytkownika i wyswietl ja
stdout.put ( "wprowadz liczbe calkowita: " );
stdin.get ( wprowadzana );
stdout.put ( "wprowadzono: ",wprowadzana, nl );
end zmienne;
program znaki;
#include ( "stdlib.hhf" );
static
zmienna: char :='A';
wprowadzana: char;
begin znaki;
//wyświetl wartość zainicjowanej zmiennej
stdout.put ( "wartosc zmiennej zadeklarowanej wynosi: ", zmienna, nl);
//pobierz wartosc od uzytkownika i wyswietl ja
stdout.put ( "wprowadz litere z klawiatury: " );
stdin.get ( wprowadzana );
stdout.put ( "wprowadzono litere: ", wprowadzana, nl );
end znaki;
#include ( "stdlib.hhf" );
static
zmienna: char :='A';
wprowadzana: char;
begin znaki;
//wyświetl wartość zainicjowanej zmiennej
stdout.put ( "wartosc zmiennej zadeklarowanej wynosi: ", zmienna, nl);
//pobierz wartosc od uzytkownika i wyswietl ja
stdout.put ( "wprowadz litere z klawiatury: " );
stdin.get ( wprowadzana );
stdout.put ( "wprowadzono litere: ", wprowadzana, nl );
end znaki;
WIELKIE DZIEKI ;*
Zakładki