Первая программа:
<!DOCTYPE html>
<html>
<head>
<style>
body {
text-align: center;
}
form {
display: inline-block;
}
form > button {
width: 100%;
}
</style>
<script>
function Privetstvie()
{
var name1 = "Моё имя";
var name = document.getElementById("Pole_vvoda_imeni").value;
var Pole_vuvoda_privetstviya = document.getElementById("Pole_vuvoda_privetstviya");
if (name === name1)
{
Pole_vuvoda_privetstviya.innerHTML = "Привет мне!";
} else {
Pole_vuvoda_privetstviya.innerHTML = "Привет, незнакомец";
}
}
</script>
</head>
<body>
<form>
<div>
<label for="Pole_vvoda_imeni">Пожалуйста, введите своё имя:</label>
<input id="Pole_vvoda_imeni" type="text">
</div>
<button type="button" onClick="Privetstvie();">Поздароваться</button>
<div id="Pole_vuvoda_privetstviya"></div>
</form>
</body>
</html>
____________________________________________
Вторая программа:
<!DOCTYPE html>
<html>
<head>
<style>
body {
text-align: center;
}
form {
display: inline-block;
}
form > button {
width: 100%;
}
</style>
<script>
function Privetstvie()
{
var name1 = "Моё имя";
var name2 = "Имя друга";
var name3 = "Имя другого друга";
var name = document.getElementById("Pole_vvoda_imeni").value;
var Pole_vuvoda_privetstviya = document.getElementById("Pole_vuvoda_privetstviya");
switch (name)
{
case name1:
Pole_vuvoda_privetstviya.innerHTML = "Привет, мне!";
break;
case name2:
Pole_vuvoda_privetstviya.innerHTML = "Привет, "+name2+"!";
break;
case name3:
Pole_vuvoda_privetstviya.innerHTML = "Привет, "+name3+"!";
break;
default:
Pole_vuvoda_privetstviya.innerHTML = "Привет, незнакомец";
}
}
</script>
</head>
<body>
<form>
<div>
<label for="Pole_vvoda_imeni">Пожалуйста, введите своё имя:</label>
<input id="Pole_vvoda_imeni" type="text">
</div>
<button type="button" onClick="Privetstvie();">Поздароваться</button>
<div id="Pole_vuvoda_privetstviya"></div>
</form>
</body>
</html>
V = S/t . Насколько я поняла, так как и с дробными числами действия должны выполняться так же.
Const
N = 13;
Var
A:array[1..N] of integer;
i,Max,Min,S:integer;
Begin
Randomize;
Write('Исходный массив A(',N,'):');
Min:=1;
Max:=1;
For i:= 1 to N do
Begin
A[i]:=random(201)-100;
Write(' ',A[i]);
if A[i]<A[Min] then Min:=i;
if A[i]>A[Max] then Max:=i;
S:=S+A[i];
End;
WriteLn;
WriteLn('Min(A) = A[',Min,'] = ',A[Min]);
WriteLn('Max(A) = A[',Max,'] = ',A[Max]);
WriteLn('Среднее арифметическое элементов массива = ',S/N);
Write('Новый массив:');
S:=A[Min];
A[Min]:=A[Max];
A[Max]:=S;
For i:= 1 to N do
Write(' ',A[i])
End.
Пример работы программы:
Исходный массив A(13): 60 -61 8 -60 58 -73 93 82 74 -35 89 -72 -44
Min(A) = A[6] = -73
Max(A) = A[7] = 93
Среднее арифметическое элементов массива = 9.15384615384615
Новый массив: 60 -61 8 -60 58 93 -73 82 74 -35 89 -72 -44
65536=2^16 16бит на 1 пиксель 70*70=4900 4900*16=78400
Var a,n:integer;
begin
writeln('Введите n');
readln(n);
for a:=10 to 99 do
if (a mod n =0)then writeln(a);
<span>end.</span>