Question

Turbo Pascal: Czy mógłby ktoś wykonać program, gdzie na ekranie będzie widoczne:

pytanie o imię, nazwisko i klasę i taki prostokąt:

* * * * * * * * * *
* * * * * * * * * *
* * * * * * * * * *
* * * * * * * * * *
* * * * * * * * * *

oraz taki trójkąt:

*

* *

* * *

* * * *

* * * * *

Answer 1

Imię, nazwisko, klasa:

Program wypis;

Uses Crt;

Var imie, nazw, klasa:String;

Begin

ClrScr;

Write('Podaj imie');

ReadLn(imie);

WriteLn('Podaj nazwisko');

ReadLn(nazw);

WriteLn('Podaj klase');

ReadLn(klasa);

WriteLn('----------------------------'); 

WriteLn('Witaj ', imie, ' ', nazwisko, ' to super, ze chodzisz do klasy', klasa); 

End.

Answer 2

Nie było wzmianki o wczytywaniu do zmiennej i sposobu wypisywania.