N=16
i=?
N=2^i, 16=2^i,i=4 (бита) (16 –это количество комбинации(вариантов),i-сообщении
о том, что произошел один из возможных вариантов события)
<span>Ответ: 4 бита содержит сообщение</span>
Uses CRT;
Const
Delay = 200; //Задержка в миллисекундах
Line = 22; //Номер строки, на которой будет текст
Text = 'Бегущая строка'; //Текст бегущей строки
Var
i: Integer;
s: String;
Begin
s := Text;
For i := 1 To 80 Do
Begin
GotoXY(1, Line);
TextColor(Random(14) + 1);
WriteLn(s);
s := ' ' + s;
Sleep(Delay);
End;
End.
Var
x,y:real;
begin
Write('Введите значение аргумента x: ');
Readln(x);
if x<=-7 then y:=25
else
if x<=5 then y:=17*x-1
else y:=sqr(x);
Writeln('Значение функции равно ',y:0:4)
end.
Тестовое решение:
Введите значение аргумента x: 3.78
Значение функции равно 63.2600
Да, является.
Наблюдая за природой человек использует в жизни ее "идеи".
^_^-а;★-я;3-л;4-б;5-ю;6-и;7-т;8-н;9-ф;10-о;(*0*)-р;12-м;13-м;+.+-у;***-к
★ 35435 68910(*0*)13^_^7***+.+
(я люблю информатику)