Как написать программу на Си, не используя символов алфавита?

Одному из студентов потребовалось перевести текст из db в переменную типа dd, а так как он сам это был сделать не в состоянии, пришлось помогать...

Код (ASM):

1.      invoke MessageBox, 0,addr MessageX, addr wTitle, MB_OK
2. . . .              
3. .data;--------------------------------------------
4. wTitle  db 'MessageBox',0
5. Message1 db 'Россия, вперёд!!',0
6. Message2 db -48,-18,-15,-15,-24,-1,44,32,-30,-17,-27,-16,-72,-28,33,33,0
7. Message3 dw 'оР','сс','яи',' ,','пв','ре','дё','!!',0
8. Message4 dd 'ссоР',' ,яи','репв','!!дё',0

в переменную типа qword и tbyte строка упорно не хотела переводится, выдавая "constant value too large", но "если нельзя, но очень хочется..."

Код (ASM):

1. Message5 dq 202CFFE8F1F1EED0h,2121E4B8F0E5EFE2r,0;r - указатель вещественного числа
2. Message6 dq 2318509284145622736t,2387440760449789922,0;t - указатель десятичного числа
3. Message7 dq 10.814462871797505e-154,4.373067346787318e-149,0
4. Message8 dq 200547776436174367320q,204417113436071367742o,0;o/q - указатель восьмеричного числа
5. Message9 dt 0EFE2202CFFE8F1F1EED0h,2121E4B8F0E5h

По последовательности в Message2 даже можно построить график и выделить функцию
или вот вариант

Код (ASM):

1.      finit
2.      fld y
3.      fsqrt
4.      fstp x
5.      mov ah,9
6.      mov dx,offset x
7.      int 21h
8.  . . . .
9. .data
10. y dt 4.1015157933598848760505494439881e-267
11. x dq ?

 

Числа Фибоначчи через формулу Бине

Код (ASM):

1. N equ 26
2. .data
3. buffer db 50 dup(?)
4. format db "%u",0
5. caption db "Fibonacci",0
6. const0_5 dd 0.5
7. k dd ?
8. inverse_square_root_from_five dd 0.44721359549995793928183473374626;=1/sqrt(5)
9. x dd 1.6180339887498948482045868343656;=(1+sqrt(5))/2
10. .code
11. start: fninit
12.     fld inverse_square_root_from_five ;st=0.44721359549995793928183473374626
13.     fld x                               ;st=1.6180339887498948482045868343656
14.     mov ecx,N+1                ;st=1.618 st(1)=0.44721
15. @@: test ecx,1
16.     jz a1
17.     fmul st(1),st        
18. a1: fmul st,st
19.     shr ecx,1
20.     jnz @b
21.     fstp st  
22.     fistp k                         ;k=int(((1.62)^N)/sqrt(5))
23.     invoke wsprintf,addr buffer,addr format,k
24.     add esp,4*3
25.     invoke MessageBox,0,addr buffer,addr caption,MB_OK
26.     invoke ExitProcess,NULL
27. end start

 

думаю что никакого препода нет - и нам морочат голову, по ходу добавляя условия.

 

А хотите... я его забаню... и он станет фиолетовый в крапинку