Path: ...!weretis.net!feeder6.news.weretis.net!feeder8.news.weretis.net!eternal-september.org!reader02.eternal-september.org!.POSTED!not-for-mail
From: Fleuger <g4fleurot@free.fr.invalid>
Newsgroups: fr.comp.sys.mac.programmation
Subject: Re: =?UTF-8?B?WSBhIGNvbW1lIHVuIGTDqWZhdXQ=?=
Date: Sat, 4 Dec 2021 09:00:59 -0000 (UTC)
Organization: A noiseless patient Spider
Lines: 26
Message-ID: <sofaob$40j$1@dont-email.me>
References: <1pjmz6k.1v0nod6mfq0rkN%josephb@nowhere.invalid> <sof8pb$mh$1@dont-email.me>
Reply-To: g5fleurot@free.fr
Mime-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
Injection-Date: Sat, 4 Dec 2021 09:00:59 -0000 (UTC)
Injection-Info: reader02.eternal-september.org; posting-host="62b030d06e5a8ba9270c7fbc5cf6f91a";
	logging-data="4115"; mail-complaints-to="abuse@eternal-september.org";	posting-account="U2FsdGVkX18HIZhlnmNv0dk7NyUqOun3"
User-Agent: MacCafe/2.06 (macOS 10.14.6 (18G9323) - iMac14,3)
Cancel-Lock: sha1:Ax9ZjOYWF0u2UZGohM9JZ88+XfA= sha256:1ygtRrVPuJvArz1g0f3EHAbub/5U2crDEwaj87mCcGQ=
	sha1:K3IztLhXxGC8be1aypUHBIqsHKg=
In-Reply-To: <sof8pb$mh$1@dont-email.me>
Face: iVBORw0KGgoAAAANSUhEUgAAADAAAAAwCAYAAABXAvmHAAABe0lEQVR4nOyVyRHDIAxFKSm
 luKSUklJcVm7OMiHeJPEFwsJjDrowBr+nBcI0TeHM4Q7QBbwBuoA3QBfwBugC3gBdwPKwcQxTDG
 S9KYEI+HyuYbn1JgU+kDGWWd+uNydAgUZYas1Sokr2EQGruTDJPCrAtVSJhEnbIC2UEj1UQMrkS
 uxxm4OBP1xAyuRKZgn/ixoDbVaBHRwhYD3AJjNA9fk/CIEmKsCJ7ACBGXC7hZB22lbnkCEOd91h
 KbDaLzMpoJGQ3gCXl1grQM1BjUeL42I/1EpIQqUCEpP4ca5EGN57h3lvbrsgLMlNWpEtfEm2TQV
 QiRwB6Z+pf8sHDjoJDTwCXS4QJQbwsISACEkkC0oa9COwElnwRII0bYuVGKgCl30WOAEOzxycsY
 QEJZALrrr1VIPGCMDwBcOaJZAaPE7A6oYxERChNm2hhS8BVwtAfW0wlNUFVhIAfA1oGwEm+7WBT
 QS+G4n+94hTw19XoKVwB7i8wAsAAP//AwAvt+R/mbrp3wAAAABJRU5ErkJggg==
X-Face:  6e|FS-+[tsA{3yQ^i0Js:O.\FWpq/o8_:3=f90joA<?I-D]V;]in~ov,0@~N9        =
 b$MVQKAt:.dm3~)#Xt/M}^S=(d!?$J_TfiH'!Z8z[;I@DS]*:2.9lxj%k]m|rhOWzcZ  
       Tnd1(>^LE~Q
Bytes: 2812

Le 4 décembre 2021 à 09:27, Fleuger a écrit ceci :

> Il  faudrait que tu trouves l'équivalent de cette formule en AS

++++++++++
set diviseur to 2.54
set serie to {0.254, 2.54, 25.4, 254, 2540}
set resultat to {}
set text item delimiters to " - "
set commentaire to "Résultat de la division par " & (diviseur as text) &
"  de" & linefeed & (serie as string)

repeat with value in serie
  copy (value div diviseur) to the end of resultat
end repeat
display alert (resultat's every item as text) message commentaire
+++++++++++
donne :
display alert "0 - 1 - 10 - 100 - 1000" message "Résultat de la division
par 2,54  de
0,254 - 2,54 - 25,4 - 254 - 2540"

C'est bien la formule mod qui crée ce résultat.
-- 
Gérard FLEUROT