Ответ:
Объяснение:
static void Main(string[] args)
{
double a, b, c, d, sum;
double sum1;
Console.WriteLine("Введите a");
a = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите b");
b = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите c");
c = Convert.ToDouble(Console.ReadLine());
Console.WriteLine("Введите d");
d = Convert.ToDouble(Console.ReadLine());
sum = Math.Sqrt(Math.Pow(a - b, 2));
sum1= Math.Sqrt(Math.Pow(c - d, 2));
Console.WriteLine("расстояние между точками а и в=" + " " + sum);
Console.WriteLine("расстояние между точками c и d=" + " " + sum1);
Console.ReadKey();
}
}
}
<em>// PascalABC.NET 3.2, сборка 1483 от 14.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var x:=ReadReal('x =');
var y:=ReadReal('y =');
Writeln('S=',9*756*Power(y,7)+2*Tan(x))
end.
<u>Пример</u>
x = 2.43
y = -0.65
S=-335.272189184345
<?
for($i=0;$i<20;$i++)
{
$number = rand(0,10000);
$a[$i] = $number;
}
$max = -1;
for($i=0;$i<20;$i++)
{
if ($a[$i] / 7 !=0 && $a[$i] >99 && $a[$i] <1000 && $a[$i] > $max)
$max = $a[$i];
}
echo "Все элементы:<br>";
for($i=0;$i<20;$i++)
{
echo "$a[$i]<br>";
}
if ($max!=-1)
{
echo "Нужный: $max";
}
else
{
echo "Не найден";
}
?>
Ответ:
2000 байт
Объяснение:
40 * 50 = 2000 количество символов в тексте
2000 * 1 = 2000 байт 2000 информационный объём текста
I = К * i, где
I - информационный объём текста
К - количество символов в тексте
i - информационный вес символа