ВБратстве

Информация о пользователе

Привет, Гость! Войдите или зарегистрируйтесь.


Вы здесь » ВБратстве » Информатика » Проги


Проги

Сообщений 1 страница 7 из 7

1

Проги^^

0

2

<html>

<script language="JavaScript">
function f2()
{
n=0
if(sel1.options[0].selected){n=n+1}
if(sel2.options[1].selected){n=n+1}
if(sel3.options[1].selected){n=n+1}
if(sel4.options[2].selected){n=n+1}
itog.value="твой результат:" +n
}
</script>
<body
background="2.jpg" >
<center>
<table>
<tr>
<td><img src="3.jpg" height=300 ></td>
<td><img src="5.jpg" height=300 ></td>
</tr>
<tr>
<td><center><font color= yellow>
<select id="sel1" size="1" multiple>
<option >да </option>
<option >нет </option>
<option >наверно </option>
<option >точно </option>
<option >ну</option>
</select>
<br>
<td><center><font color= yellow>
<select id="sel2" size="1" multiple>
<option >да </option>
<option >нет </option>
<option >наверно </option>
<option >точно </option>
<option >ну</option>
</select><br>
</td></center>
</tr>
<tr>
<td><center><img src="7.jpg" height=300 ></td>
<td><img src="8.jpg" height=300 ></td>
</tr>
<tr>
<td><center><font color= yellow>
<select id="sel3" size="1" multiple>
<option >да </option>
<option >нет </option>
<option >наверно </option>
<option >точно </option>
<option >ну</option>
</select><br>
<td><center><font color= yellow>
<select id="sel4" size="1" multiple>
<option >да </option>
<option >нет </option>
<option >наверно </option>
<option >точно </option>
<option >ну</option>
</select><br>
</td></center>
</table>
<center>
<input type="button"  value="resulta" onClick="f2()"><br><br>
</center>
<center>

<input type="text" id="itog" size= 20>
</center>

</center>

</html>

0

3

<html>
<script language="javascript">
a=prompt("*И тут ты понимаешь что тебе нужно написать первый знак*"," ")
b=prompt("*И тут ты понимаешь что тебе нужно написать второй знак*"," ")
c=prompt("*И тут ты понимаешь что тебе нужно написать третий знак*"," ")
d=b*b-4*a*c
if(d<0){alert("НЕТ КОРНЕЙ!")
}
if(d==0){alert("x="+ (-b/(2*a)))
}
if(d>0){
alert("x="+(-b+Math.sqrt(d))/(2*a)+" x="+(-b-Math.sqrt(d))/(2*a))
}

</script>
</html>

0

4

423ор4о32

0

5

ро

0

6

Sub ÆÌÈ()
Set AppWord = CreateObject("Word.Application")
AppWord.Visible = True
AppWord.Documents.Add
    For s = 2 To 371
        If (Cells(s, 3) = "ì" And Left(Cells(s, 5), 2) = "10" Or Cells(s, 3) = "ì" And Left(Cells(s, 5), 2) = "11") Then
           Cells(100, 100) = Cells(s, 2) + " " + Cells(s, 1)
           Cells(100, 100).Copy
           AppWord.Selection.Paste
        End If
    Next s

End Sub

0

7

Все картинки - мувики с названиями k1.......  k12
все обложки - мувики с названиями ob1 ......  ob12
Переходим в слой программ
в первом кадре -    n=0
в третьем кадре      gotoandplay(2)
во втором кадре написать 12 программ (здесь 1 --> 2)
ob1.onPress=function()
{ob1._visible=false
if(f==0){eval("ob"+n)._visible=true}
f=0
if (n==2)
    {k1._visible=false
      k2._visible=false
      ob2._visible=false
      f=1
     }
n=1
}

0


Вы здесь » ВБратстве » Информатика » Проги