19 lines
1.2 KiB
C
19 lines
1.2 KiB
C
|
#включить "тест.з"
|
|||
|
|
#включить "stdvv.c"
|
|||
|
|
|
|||
|
|
цел главн() {
|
|||
|
|
ПРОВЕРИТЬ(0, ({ переч { ноль, один, два }; ноль; }));
|
|||
|
|
ПРОВЕРИТЬ(1, ({ переч { ноль, один, два }; один; }));
|
|||
|
|
ПРОВЕРИТЬ(2, ({ переч { ноль, один, два }; два; }));
|
|||
|
|
ПРОВЕРИТЬ(5, ({ переч { пять=5, шесть, семь }; пять; }));
|
|||
|
|
ПРОВЕРИТЬ(6, ({ переч { пять=5, шесть, семь }; шесть; }));
|
|||
|
|
ПРОВЕРИТЬ(0, ({ переч { ноль, пять=5, три=3, четыре }; ноль; }));
|
|||
|
|
ПРОВЕРИТЬ(5, ({ переч { ноль, пять=5, три=3, четыре }; пять; }));
|
|||
|
|
ПРОВЕРИТЬ(3, ({ переч { ноль, пять=5, три=3, четыре }; три; }));
|
|||
|
|
ПРОВЕРИТЬ(4, ({ переч { ноль, пять=5, три=3, четыре }; четыре; }));
|
|||
|
|
ПРОВЕРИТЬ(4, ({ переч { ноль, один, два } х; размер(х); }));
|
|||
|
|
ПРОВЕРИТЬ(4, ({ переч т { ноль, один, два }; переч т у; размер(у); }));
|
|||
|
|
|
|||
|
|
printf("OK\n");
|
|||
|
|
возврат 0;
|
|||
|
|
}
|