<head><title>
מפריד מחרוזות
</title></head>
<body dir=rtl>
<font face=arial>
<script language=javascript>
function Js(){
var w=new Array()
wnu=1
s=prompt('נא שים את המחרוזת כאן ונפריד לך אותה למילים:','')
for (i1=0;i1<s.length;i1++){
if (w[wnu]==undefined){w[wnu]=''}
if (s.substr(i1,1)==" "){
wnu=wnu+1
}else{
w[wnu]=w[wnu]+s.substr(i1,1)
}}
document.getElementById("toz").innerHTML=''
for(i1=1;i1<wnu+1;i1++){
document.getElementById("toz").innerHTML=document.getElementById("toz").innerHTML+"מילה מספר "+i1+": <font face=arial color=red>"+w[i1]+"</font><br>"
}}
</script>
<script language=vbscript>
public sub Vbs()
dim word(1000000)
wnum=1
s=inputbox("נא שים את המחרוזת כאן ונפריד לך אותה למילים:")
for i=1 to len(s)
if mid(s,i,1)=" " then
wnum=wnum+1
else
word(wnum)=word(wnum)&mid(s,i,1)
end if
next
document.getElementById("toz").innerHTML=""
for x=1 to wnum
document.getElementById("toz").innerHTML=document.getElementById("toz").innerHTML&"מילה מספר "&x&": <font face=arial color=red>"&word(x)&"</font><br>"
next
end sub
</script>
<form>
<fieldset style=width:29%;>
<legend>שפת הביצוע</legend>
<input type=button value="Java Script" onclick=Js()>
<input type=button value="Visual Basic Script" onclick=Vbs()>
</fieldset>
</form>
<div id="toz" dir=rtl></div>
<br>
<fieldset style=width:19%;>
<legend>כל הזכויות שמורות</legend>
<div id=copyright>&copy;&nbsp;משה אטלו&nbsp;mo@low</div>
</fieldset>
</font>