Section courante

A propos

Section administrative du site

 Langage  Elément  Programmation  Annexe  Aide 
ABAP/4
Ada
Assembleur
Assembly & bytecode
ASP (Active Server Pages)
Basic
C
C++
C# (C Sharp)
Cobol
ColdFusion
Fortran
HTML
Java
JavaScript
LISP
Logo
LotusScript
Oberon
Pascal
Perl
PHP
PL/1
Prolog
Python
Rebol
REXX
Ruby
SAS
NoSQL
SQL
Swift
X++ (Axapta)
GNAT
SMALLAda
VHDL
Assembleur 370
Assembleur 1802
Assembleur 4004
Assembleur 6502
Assembleur 6800
Assembleur 68000
Assembleur 8080 et 8085
Assembleur 8089
Assembleur 80x86
Assembleur AGC4
Assembleur ARM
Assembleur DPS 8000
Assembleur i860
Assembleur Itanium
Assembleur MIPS
Assembleur PDP-11
Assembleur PowerPC
Assembleur RISC-V
Assembleur SPARC
Assembleur SuperH
Assembleur UNIVAC I
Assembleur VAX
Assembleur Z80
Assembleur Z8000
Assembleur z/Architecture
ASSEMBLER/MONITOR 64
Micol Assembler
GFA Assembler
A86
MASM (Macro Assembler)
TASM (Turbo Assembler)
CIL
Jasmin
LLVM
MSIL
Parrot
P-Code (PCode)
SWEET16
G-Pascal
ASP 1.0
ASP 2.0
ASP 3.0
ASP.NET
ASP.NET Core
ABasiC (Amiga)
Adam SmartBASIC
Altair BASIC
AmigaBASIC (Amiga)
AMOS Basic (Amiga)
Atari Basic (Atari 400, 600 XL, 800, 800XL)
Basic Apple II (Integer BASIC/APPLESOFT)
Basic Commodore 64 (CBM-BASIC)
Basic Commodore 128 (BASIC 7.0)
Basic Commodore VIC-20 (CBM-BASIC 2.0)
Basic Coco 1 (Color Basic)
Basic Coco 2 (Extended Color Basic)
Basic Coco 3 (Extended Color Basic 2.0)
BASICA (PC DOS)
Basic Pro
BBC BASIC
Blitz BASIC (Amiga)
DarkBASIC
Dartmouth BASIC
GFA-Basic (Atari ST/Amiga)
GWBASIC (MS-DOS)
Liberty BASIC
Locomotive BASIC (Amstrad CPC)
MSX-Basic
Omikron Basic (Atari ST)
Oric Extended Basic
Power Basic
Quick Basic/QBasic (MS-DOS)
Sinclair BASIC (ZX80, ZX81, ZX Spectrum)
ST BASIC (Atari ST)
Turbo Basic
Vintage BASIC
VBScript
Visual Basic (VB)
Visual Basic .NET (VB .NET)
Visual Basic pour DOS
Yabasic
BeckerBASIC
SIMONS' BASIC
Basic09 d'OS-9
Disk Extended Color Basic
Basic09 d'OS-9
Disk Extended Color Basic
Access
Excel
Visual Basic pour Windows
Visual Basic .NET pour Windows
C Shell Unix (csh)
C pour Amiga
C pour Atari ST
C pour DOS
C pour Falcon030
C pour GEMDOS (Atari ST)
C pour Linux
C pour PowerTV OS
C pour OS/2
C pour Unix
C pour Windows
Aztec C
CoCo-C
GNU C
HiSoft C
IBM C/2
Introl-C
Lattice C
Microsoft C
MinGW C
MSX-C
Open Watcom C
OS-9 C Compiler
Pure C
Quick C
Turbo C
HiSoft C for Atari ST
HiSoft C for CP/M (Amstrad CPC)
C++ pour OS/2
C++ pour Windows
Borland C++
C++Builder
IBM VisualAge C++
Intel C++
MinGW C++
Open Watcom C++
Symantec C++
Turbo C++
Visual C++
Visual C++ .NET
Watcom C++
Zortech C++
C# (C Sharp) pour Windows
Apple III Cobol
Microsoft Cobol
BlueDragon
Lucee
OpenBD
Railo
Smith Project
Microsoft Fortran
WATFOR-77
CSS
FBML
Open Graph
SVG
XML
XSL/XSLT
LESS
SASS
GCJ (GNU)
JSP
Jython
Visual J++
Node.js
TypeScript
AutoLISP
ACSLogo
LotusScript pour Windows
Amiga Oberon
Oberon .NET
Apple Pascal
Delphi/Kylix/Lazarus
Free Pascal
GNU Pascal
HighSpeed Pascal
IBM Personal Computer Pascal
Lisa Pascal
Maxon Pascal
MPW Pascal
OS-9 Pascal
OSS Personal Pascal
Pascal-86
Pascal du Cray Research
Pascal/VS
Pascal-XT
PURE Pascal
QuickPascal
RemObjets Chrome
Sun Pascal
THINK Pascal
Tiny Pascal (TRS-80)
Turbo Pascal
UCSD Pascal
VAX Pascal
Virtual Pascal
Turbo Pascal for CP/M-80
Turbo Pascal for DOS
Turbo Pascal for Macintosh
Turbo Pascal for Windows
CodeIgniter (Cadre d'application)
Drupal (Projet)
Joomla! (Projet)
Phalanger (PHP .NET)
phpBB (Projet)
Smarty (balise)
Twig (balise)
Symfony (Cadre d'application)
WordPress (Projet)
Zend (Cadre d'application)
PL360
PL/M-80
PL/M-86
Turbo Prolog
CPython
IronPython
Jython
PyPy
AREXX
Regina REXX
JMP
Btrieve
Cassandra
Clipper
CouchDB
dBASE
Hbase
Hypertable
MongoDB
Redis
Access
BigQuery
DB2
H2
Interbase
MySQL
Oracle
PostgreSQL
SAP HANA
SQL Server
Sybase
U-SQL
Remarque
Opérateur
Conditionnel
Tableur (chiffrier électronique)
Type de données
Référence
Bonjour
Astronomie
Biochimie
Fichier
Géographie
Géométrie
Histoire
Mathématique
Médicale
Météorologie
Océanographie
Sport
Temps
Trigonométrie
Validation
Phase lunaire
Calcul du calcium corrigé
Lecture d'un fichier texte séquentiel
Distance en Km entre deux longitudes et latitudes
Aire d'un cercle
Aire d'une surface de prisme rectangulaire
Aire d'un triangle
Distance entre deux points
Chiffre romain
Ackermann
Exp
Factoriel
Fibonacci
Log
Nombre premier
Odd
Random
Sqrt
Triangle Pascal
Hauteur utérine
Unité de mesure
Fréquence des vagues
Hockey
Année bissextile
Calendrier
Date de la Pâque
ArcCos
ArcSin
Atn/ATan/ArcTan/ArcTangente
Cos
Sin
Courriel
Bibliographie
Préface
Notes légal
Dictionnaire
Recherche

Pour connaitre la vitesse de croissance moyenne de la hauteur utérine lors de la grossesse d'une femme enceinte, on utilise souvent la formule empirique de Fournié (1987). En somme, on se retrouve avec le tableau suivants :

SA (Semaines d'Aménorrhée) Mois d'Aménorrhée Hauteur utérine Intervalle
16 à 32 3 1/2 à 7 Croissance de 1 cm par jour Entre -4 et 1 cm proportionnel à SA
33 à 40 7 à 9 Croissance de 1/2 cm par jour Entre -4 et 1 cm

A noter que la SA est l'abréviation de «Semaines d'Aménorrhée», soit le nombre de semaine depuis la fécondation de l'ovule (du commencement de la grossesse). A l'aide du code source LotusScript suivant, vous trouverez la réponse que vous souhaitez :

  1. Function CalculHauteurUterineInf(SA As Integer) As Double
  2.      If SA<=15 Then 
  3.           CalculHauteurUterineInf = SA
  4.      Elseif SA<=32 Then 
  5.           CalculHauteurUterineInf = SA-4
  6.      Elseif SA<=40 Then 
  7.           CalculHauteurUterineInf = ((SA-32.0)/2.0)+28.0
  8.      Else 
  9.           CalculHauteurUterineInf = -1
  10.      End If
  11. End Function
  12.  
  13. Function CalculHauteurUterineSup(SA As Integer) As Double
  14.      If SA<=15 Then 
  15.           CalculHauteurUterineSup = SA
  16.      Elseif SA<=32 Then 
  17.           CalculHauteurUterineSup = SA+1
  18.      Elseif SA<=40 Then 
  19.           CalculHauteurUterineSup = ((SA-32.0)/2.0)+33.0
  20.      Else
  21.           CalculHauteurUterineSup = -1
  22.      End If
  23. End Function
  24.  
  25. Sub Main()
  26.      Dim I As Integer
  27.      For I=16 To 40
  28.           Print "A la " & Str$(I) & " semaine(s), la valeur moyenne est de " & Str$(CalculHauteurUterineInf(I)) & " à " & Str$(CalculHauteurUterineSup(I)) & "cm"
  29.      Next 
  30. End Sub

on obtiendra le résultat suivant :

A la 16 semaine(s), la valeur moyenne est de 12.0 à 17.0cm
A la 17 semaine(s), la valeur moyenne est de 13.0 à 18.0cm
A la 18 semaine(s), la valeur moyenne est de 14.0 à 19.0cm
A la 19 semaine(s), la valeur moyenne est de 15.0 à 20.0cm
A la 20 semaine(s), la valeur moyenne est de 16.0 à 21.0cm
A la 21 semaine(s), la valeur moyenne est de 17.0 à 22.0cm
A la 22 semaine(s), la valeur moyenne est de 18.0 à 23.0cm
A la 23 semaine(s), la valeur moyenne est de 19.0 à 24.0cm
A la 24 semaine(s), la valeur moyenne est de 20.0 à 25.0cm
A la 25 semaine(s), la valeur moyenne est de 21.0 à 26.0cm
A la 26 semaine(s), la valeur moyenne est de 22.0 à 27.0cm
A la 27 semaine(s), la valeur moyenne est de 23.0 à 28.0cm
A la 28 semaine(s), la valeur moyenne est de 24.0 à 29.0cm
A la 29 semaine(s), la valeur moyenne est de 25.0 à 30.0cm
A la 30 semaine(s), la valeur moyenne est de 26.0 à 31.0cm
A la 31 semaine(s), la valeur moyenne est de 27.0 à 32.0cm
A la 32 semaine(s), la valeur moyenne est de 28.0 à 33.0cm
A la 33 semaine(s), la valeur moyenne est de 28.5 à 33.5cm
A la 34 semaine(s), la valeur moyenne est de 29.0 à 34.0cm
A la 35 semaine(s), la valeur moyenne est de 29.5 à 34.5cm
A la 36 semaine(s), la valeur moyenne est de 30.0 à 35.0cm
A la 37 semaine(s), la valeur moyenne est de 30.5 à 35.5cm
A la 38 semaine(s), la valeur moyenne est de 31.0 à 36.0cm
A la 39 semaine(s), la valeur moyenne est de 31.5 à 36.5cm
A la 40 semaine(s), la valeur moyenne est de 32.0 à 37.0cm

N.B.: Il est a noter que cette formule fonctionne assez bien au XXième et XXIième siècles en Europe et en Occident mais qu'il n'est pas certain qu'elle soit applicable pour nos ancêtres (utilisant des calculs avec deux doigts) ou notre lointaine descendance. De plus, il va de soit qu'on aurait des résultats forts différents pour une souris ou un éléphant et qu'en somme, elle ne s'applique que pour l'humain.

Voir également

Science - Médecine

PARTAGER CETTE PAGE SUR
Dernière mise à jour : Dimanche, le 18 janvier 2015