Niskopoziomowe lab4

1. WYSWIETLANIE W POSTACI DZIESIETNEJ I WYKLADNICZEJ
program zmiennoprzecinkowe;
	#include ("stdlib.hhf");
static
a: real32:=-4.87660e-2;
b: real64:=562.3456e1;
c: real80:=3.14e-15;

begin zmiennoprzecinkowe;
stdout.put(" Postac dziesietna: ", nl);
stdout.putr32(a, 10, 2, ' ');
stdout.newln();
stdout.putr64(562.3456e1, 10, 4, ' ');
stdout.newln();
stdout.putr80(3.14e-15, 20, 15, ' ');

stdout.put( nl ," Postac wykladncza: ", nl);
stdout.pute32(-4.87660e-2, 10);
stdout.newln();
stdout.pute64(562.3456e1, 10);
stdout.newln();
stdout.pute80(3.14e-15, 10);

end zmiennoprzecinkowe;

2. ZMIENIANIE MALYCH NA DUZE

program ascii;
	#include ("stdlib.hhf");
static
znak1: char;

begin ascii;
stdout.put("Podaj mala literke", nl);
stdin.get(znak1);
stdout.putc(znak1);
mov(znak1, AL); // do kodu DEC znaku wprowadzanego dodaje sie 32
sub(32, AL);
mov(AL, znak1);
stdout.put("Podana litera zmieniona na duza: ", nl);
stdout.put(znak1);

end ascii;
3.

program ascii;
	#include ("stdlib.hhf");
static
znak1: char;

begin ascii;
stdout.put("Podaj duza litere", nl);
stdin.get(znak1);
stdout.putc(znak1);

if(znak1 >= 65 && znak1<= 90) then
mov(znak1, AL);
add(32, AL);
mov(AL, znak1);
stdout.put("Podana litera zmieniona na mala: ", nl);
stdout.put(znak1);
//mov(a, AL);
//or(32, AL);
//mov(AL, a);
else

stdout.put(" Podano zly znak!!");
 stdout.newln();
endif;

end ascii;