Var x1,y1,x2,y2,r:real;
begin
write('Введите x1,y1');read(x1,y1);
write('Введите x2,y2');read(x2,y2);
r:= sqrt(sqr(x2-x1) + sqr(y2-y1));
write('расстояние между двумя точками = ',r);
<span>end.</span>
<span><span>Дано: Кб = Кс =8,</span> i 6 = 2 бита.
</span>Найти: Кк - ?
Решение:
<span>1)i 6
= log2(l/P6),
2 = Iog2(l/p6<span>),
1/р6 = 4, р6 = '/4 - вероятность расхода белой
банки;</span></span>
<span>2)<span>N = Кб/рб = 8/(1/4) = 32 - банки с
краской было всего;</span></span>
<span>3)<span> <span>Кк.= N - К6
- Кс = 32 - 8 - 8 = 16 банок коричневой краски.
</span>Ответ: <span>16 банок коричневой краски.</span></span></span>
1)i:=7;
<span>while i<=8 do begin
writeln('Привет!');
i:=i+1 =8
2)i:=8</span><span>;
<span>while i<=8 do begin
writeln('Привет!');
</span></span><span>i:=i+1 =9
На следующий раз он уже не повторится
Ответ: 7
</span>
Namespace Вывод {
class Program {
static void Main(string[] args)
{
int n = 10;
int[] Mass = new int[n];
Random R = new Random();
for (int i = 0; i < n; i++) {Mass[i] = R.Next(0, 30);} Console.Write("\n--------- Массив -------------\n");
for (int i = 0; i < n; i++)
{ Console.Write(Mass[i] + " "); }
Console.ReadKey();
}<span> }
Что может быть проще?</span>
Переведём скорость передачи из бит в Кб.
256000 бит/с = 31,25 Кб/с.
Теперь просто умножим скорость на время.
31,25 Кб/с * 15с = <span>468,75 Кб.</span>