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|<
<b>else</b> writeln ('x*y poza przedziałem');
<b>end</b>.
|