Ada 95, zmienne

0

Witam, mam za zadanie napisać datę dnia następnego na IFie w języku Ada.

Chciałbym zrobić coś takiego

IF MM=1|3|5|7|8|10|12 AND DD>=1 AND DD<=30 THEN DD:=DD+1;

Jak się domyślicie, data zmieni tylko dzień o jeden, dla miesięcy, w których to liczba dni wynosi 31.

Jednak takie coś nie działa, bo wg kompilatora pomiędzy 1 a 3 powinno być then.
Jak inaczej to rozwiązać

0

1|3|5|7|8|10|12 co toto ma wg ciebie robić?

0

Hmm co to ma robić? Jeżeli miesiąc równy 1 albo 3 albo 5 itd...

0

A widziałes język który wspiera takie coś? Co najwyżej są takie
IF (MM=1)|(MM=3)|...

0

Zapisałem to tak:
IF DD>=1 AND DD<=30 AND ((MM=1) or (MM=3) or (MM=5) or (MM=7) or (MM=8) or (MM=10) or (MM=12)) THEN DD:=DD+1;

Być może | nie działa w Ifie tylko w Case.

0

„data dnia następnego” nie jest aż taka trywialna: co z 31 XII?
co z lutym? kiedy jest rok przestępny?

0

hehe:D nigdzie nie napisałem, że to jest koniec programu :P to jest mały wycinek co się dzieje dla miesięcy co mają 31 dni a użytkownik podaje dzień z zakresu 1-30

1 użytkowników online, w tym zalogowanych: 0, gości: 1