Polecenie "WRITE" służy do wypisywania danych na ekranie.
Napisz przed końcowym "END." coś takiego: ReadLn; nie koniecznie ze średnikiem.
Jeśli nie masz takiego czegoś to wynik można zobaczyć wciskając kombinację klawiszy Alt + F5.
Napisz mi jeszcze na jakiej wersji TP pracujesz?
-> 6.0
-> 7.0
-> może jakiejś innej
Napiszę Ci przykładowe programy: (dalej w tym kursie powinno coś być o tym poleceniu: ReadLn)
1)
PROGRAM napis;
BEGIN
WRITE ('To moj pierwszy program w TP');
ReadLn;
END.2)
PROGRAM suma;
VAR
a, b, c : Byte;
BEGIN
WRITE ('Podaj pierwsza liczbe: ');
ReadLn (a);
WRITE ('Podaj druga liczbe: ');
ReadLn (b );
c := a + b;
WRITE ('Suma liczb = ', c);
ReadLn;
END.W razie pytań pisz




Moja zawartość
Mężczyzna

