Kompilowanie i błąd programistyczny

0

Używam programu TMT Pascal Lite. Mam dwa programy w jednym z nich jest błąd dzięki któremu możne robić komputer w głupa. Nie chodzi tutaj o wyskakiwanie błędu.

Oto kody programów:

I.

Program Wtaj1a;
VAR Imie, Odpowiedz: String; Wiek: Integer;

BEGIN
Writeln ('Witam Cie! Jak masz na imie?');
Readln (Imie);
Writeln ('Milo Cie poznac ',Imie);
Writeln ('Jak sie masz?');
Readln (Odpowiedz);
Writeln ('Zatem masz sie ', Odpowiedz);
Writeln ('Ile masz lat?');
Readln (Wiek);
Writeln ('No to zostalo Ci jeszcze ',100-Wiek, ' lat');
Readln;
END.

II.

Program Witaj;
var Imie, Odpowiedz: string; Wiek: integer;
begin
writeln ('Witam Cie! Jak masz na imie?');
readln (Imie);
writeln ('Milo Cie poznac' , Imie);
writeln ('Jak sie masz?')
readln (Odpowiedz);
if Odpowiedz = 'dobrze' then
writeln ('Ciesze sie')
else if Odpowiedz = 'zle' then
writeln ('Przykro mi')
else
writeln ('Nie rozumiem...');
writeln ('Ile masz lat?')
readln (Wiek);
writeln ('No to zostalo Ci jeszcze' , 100-Wiek, 'lat');
readln;
end.

Mam dwa problemy otóż w drugim programie pokazuje błąd w: 'readln (Odpowiedz);'. Nie wiem dlaczego? Drugi problem to to, że nie mogę znaleźć tego błędu programistycznego wydaje mi się że to właśnie gdzieś tam w Odpowiedzi w drugim programie, ale nie jestem pewny. Bardzo prosze o pomoc w rozwiązaniu tych dwóch problemów.

0
writeln ('Milo Cie poznac' , Imie);
writeln ('Jak sie masz?') <b><-</b>
readln (Odpowiedz);

Czlowiecze, przeczytal byc chociaz co kompiltor ci wypluwa a nie wpakowales kod i pytasz co jest zle [glowa]

0

a jaki błąd?

0
Wolverine napisał(a)
writeln ('Milo Cie poznac' , Imie);
writeln ('Jak sie masz?') <b><-</b>
readln (Odpowiedz);

Czlowiecze, przeczytal byc chociaz co kompiltor ci wypluwa a nie wpakowales kod i pytasz co jest zle [glowa]

To już wiem że zapomniałem wstawić średnika, a wie ktoś co może być z tym, że można jakoś oszukać komputer? "Zrobić z niego głupa"?

0

pierwszy raz słyszę żeby komputer można było zrobić w głupa...może chodzi o zakres zmiennej wiek i ewentualne komplikacje przy jego podawaniu ?

0
uses CRT;

?

1 użytkowników online, w tym zalogowanych: 0, gości: 1