Newsgroup: it.comp.lang.c
Titolo: WinDOS: calcolo della Pasqua

WinDOS è adatto a chi desidera avvicinarsi alla programmazione. Usando un C
ridottissimo, compila e linka eseguibili in codice binario proprio, eseguiti poi
come interprete. Mantiene una sessione di comandi, in stile DOS, e con un menù
personalizzabile, esegue programmi già scritti, ad uso degli utenti non tecnici.
WinDOS è freeware ed è inviato a chiunque ne faccia richiesta a
tema...@texfree.it
  come 683 K attaccati ad un e-mail.
Nella richiesta indicate la vostra versione di Windows
                                                     Grazie dell'attenzione..
// Date della Pasqua e del Lunedì Santo
// in due interi nella forma aaaammgg
void Pasqua(int anno, int *pasqua, int *lunedi)
{
  int a, b, c, d, e, g, m, n, x, y, z; 
  char k1[11]={2,2,3,4,5,5,6,0,1,1,2};
  char k2[11]={15,22,23,23,24,24,24,25,26,25,26};
 
  if (anno<1583 || anno>2599) {*pasqua=0; *lunedi=0; goto fine;}
  g = 0; m = 0;
  a = anno / 100 - 15;
  n = k1[a]; m = k2[a];
  x = anno % 19; b = anno % 4;
  c = anno % 7; y = m + 19 * x;
  d = y % 30; z = 2 * b + 4 * c + 6 * d + n;
  e = z % 7; g = 22 + d + e;
  if (g <= 31) {m = 3; goto prepara;}
  g = g - 31; m = 4;
  if (g == 26) {g = 19; goto prepara;}
  if (g < 25) goto prepara;
  if (d == 28 && x > 10) g = 18;
prepara:
  *pasqua=anno*10000+m*100+g;  
  g++; if (g > 31) {g = 1; m++;}
  *lunedi=anno*10000+m*100+g;  
fine:
  return;
}
-------------------------------------------
Programmare in C< con WinDOS 1.0 (freeware)
Su richiesta 683 K attaccati ad un e-mail.

   return;
e uno che sta imparando a programmare lo deve fare usando goto?
bah... :-/
ciao
xaero

bah... :-/
Vorrei conoscere il reale perchč il goto debba essere messo all'indice, a parte
la scelta "politica" di non usarlo (come scriveresti l'algoritmo strutturato
usando meno istruzioni?). Sono anni che la programmazione strutturata vieta il
goto, ma nei vari linguaggi io lo trovo sempre e tutte le strutture (for, while,
do, switch) sono scrivibili in termini di if e goto (l'assembler usa cmp e jmp,
e gira gira tutti gli eseguibili passano di lě).


 Tutor at D.S.I. University of Milan
V_/_ 'The future will not remember, the past doesn't forget.'
I'm Linux zion 2.4.0 #1 ven feb 9 16:49:44 CET 2001 i586

 goto, ma nei vari linguaggi io lo trovo sempre
Nel Clipper non c'č. :-)
EMG

e jmp, e gira gira tutti gli eseguibili passano di lě).
ti sbagli
esiste un linguaggio di programmazione, lo SMITH, che non ha salti 
condizionali... anzi, non ha salti e basta, il programma va sempre e 
solo in avanti, i cicli vengono implementati tramite l'auto-
modificazione del programma. 
-- 
January 15, 2028 - Intel announces their new 400THz processor, which 
performs 100 billion floating-point operations in the millisecond before 
it consumes itself in a nuclear explosion. This is a step up from AMD's 
recent processor which simply fries any nearby user with bolts of plasma 
energy. Hobbyists are already looking into ways to overclock the chip.

 Nel Clipper non c'č. :-)
Non e' esatto... e' vero che non te la danno come istruzione da scrivere nei
prg, cosi' si sono parati il culo da eventuali discussioni di questo tipo^_^
, ma se guardi il P-code (mai usato Valkyrie/Rescue5?) anche qui tutti i
costrutti sono dei if..jmp, (quindi goto). Alla fine TUTTO in ogni
linguaggio si risolve in salti condizionati o meno.

 modificazione del programma.
Puoi postare un piccolo esempio, o indicarmi un link dove vedere questa
stranezza?
Grazie!
--
Peruch Emiliano
SoftWay S.r.l.