langs a-z
This commit is contained in:
parent
db842d013d
commit
d066446780
11389 changed files with 98361 additions and 1020 deletions
11
Task/Assertions/Component-Pascal/assertions.component
Normal file
11
Task/Assertions/Component-Pascal/assertions.component
Normal file
|
|
@ -0,0 +1,11 @@
|
|||
MODULE Assertions;
|
||||
VAR
|
||||
x: INTEGER;
|
||||
PROCEDURE DoIt*;
|
||||
BEGIN
|
||||
x := 41;
|
||||
ASSERT(x = 42);
|
||||
END DoIt;
|
||||
END Assertions.
|
||||
|
||||
Assertions.DoIt
|
||||
Loading…
Add table
Add a link
Reference in a new issue