![Zdjęcie](https://www.forum.tweaks.pl/public/style_images/master/profile/default_large.png)
Problemy z Turbo Pascalem
#1
Napisano 03 02 2013 - 23:01
VAR
imie:string;
BEGIN
write('Jak masz na imię?');
read(imie);
write('Witaj ');
write(imie);
write('. Życzę miłego dnia!!!');
readln;
END.
Wyskakuje mi okienko z Jak masz na imię?, wpisuje swoje imię i zamiast Życzę miłego dnia, nic się nie dzieje a jak wcisnę enter to mi się wyłącza. Ktoś pomoże początkującemu?
#2
Napisano 03 02 2013 - 23:11
readln(imie);to Ci rozwiąże problem.
Chyba, że koniecznie chcesz mieć read to wtedy na końcu zamiast readln; daj readkey;
Użytkownik bipiw edytował ten post 03 02 2013 - 23:28
#3
Napisano 04 02 2013 - 11:52
#4
Napisano 04 02 2013 - 12:33
Kod wygląda tak:
var
imie:string;
s:Integer;
begin
write('Jak masz na imie ');
readln(imie);
write('Witaj ');
writeln(imie);
writeln('Zycze milego dnia');
read(s);
end.
z czego to read(s) czeka na naciśniecie dowolnego klawisz, a następnie enter, aby zakończyć program.
Gdy napiszesz writeln to po napisaniu tekstu kursor przejdzie do nowej linii, tak samo jest z readln.
Po za tym w twoim kursie jest dalej wszystko opisane
![;)](/public/style_emoticons/default/wink.png)
Użytkownik pawel315 edytował ten post 04 02 2013 - 12:43
#5
Napisano 04 02 2013 - 12:56
Użytkownik wheatus edytował ten post 04 02 2013 - 12:58
#6
Napisano 04 02 2013 - 14:24
VAR imie:string; BEGIN write('Jak masz na imię?'); readln(imie); write('Witaj '); write(imie); write('. Życzę miłego dnia!!!'); readln; END.
Użytkownik bipiw edytował ten post 04 02 2013 - 14:25
#7
Napisano 05 02 2013 - 19:05
Napisałem takie coś:
begin
writeln('Pierwsze zdanie');
writeln('Drugie zdanie');
writeln('Trzecie zdanie');
readl;
end.
var
liczba1,liczba2:longint;
begin
writeln('Podaj pierwszą liczbę:');
readln(liczba1);
writeln('Podaj drugą liczbę:');
readln(liczba2);
writeln('Ich iloczyn wynosi:',liczba1*liczba2);
readln;
end.
uses crt
begin
clrscr;
gotyxy(30,30);
write('Do Widzenia');
readln;
end.
I mam dwa problemy:
Po wyświetleniu "Trzecie zdanie" i wcisnięciu enter program się zamyka. Co robię źle?
Jakie są współrzędne środka ekranu?
Użytkownik wheatus edytował ten post 05 02 2013 - 19:07
#8
Napisano 06 02 2013 - 00:35
uses crt; var liczba1,liczba2:longint; begin writeln('Pierwsze zdanie'); writeln('Drugie zdanie'); writeln('Trzecie zdanie'); readln; writeln('Podaj pierwszą liczbę:'); readln(liczba1); writeln('Podaj drugą liczbę:'); readln(liczba2); writeln('Ich iloczyn wynosi:',liczba1*liczba2); readln; clrscr; gotoxy(30,30); write('Do Widzenia'); readln; end.(tego nie testowałem ale myśle że o coś w tym stylu chodzi)
Użytkownik bipiw edytował ten post 06 02 2013 - 00:53
#9
Napisano 06 02 2013 - 21:52
#10
Napisano 06 02 2013 - 22:31
![:P](/public/style_emoticons/default/tongue.png)
Użytkownik bipiw edytował ten post 06 02 2013 - 22:35
Użytkownicy przeglądający ten temat: 1
0 użytkowników, 1 gości, 0 anonimowych