Object Pascal/Instrukcje: Różnice pomiędzy wersjami

Usunięta treść Dodana treść
brak minusa, bez którego przykład jest błędny
wartość bezwzględna z 25 i -25 to 25, a nie 5
Linia 127:
<b>case</b> x*y <b>of</b>
0: writeln('x*y=0');
-25..-1,1..25: writeln('|x*y|<525'); //stałe wyboru nie mogą się powtarzać
<b>else</b> writeln ('x*y poza przedziałem');
<b>end</b>.