//<em>ax</em><em> + </em><em>b</em><em> = 0,</em><span> где </span><em>а и b</em><span> – любые числа.
var a,b,x:real; //инициализирует переменные a,b и x типа real, с плавающей точкой
begin; //начало программы
readln(a); //ввод a
readln(b); //ввод b
x:=-b/a; //находим корень
writeln(x); //выводим корень
end. //конец программы</span>
===== PascalABC.NET =====
begin
var a := ArrRandom(50, -99, 99);
a.Println;
var b := ReadArrReal('Ведите 10 чисел:', 10);
b.Println;
end.
1/16 кбайт = 64 байт = 512 бит
512 бит / 128 символов = 4 бита на символ
2^4 = 16 - максимальное количество комбинаций для шифрования букв.
Ответ B
Z = 1; i = 0
z = (z+x/2)/2 = (1+14/2)/2 = 4; i = i+1 = 0+1 = 1; i<4 ⇒ 1<4 ⇒ да
z = (z+x/2)/2 = (4+14/2)/2 = 5.5; i = i+1 = 1+1 = 2; i<4 ⇒ 2<4 ⇒ да
z = (z+x/2)/2 = (5.5+14/2)/2 = 6.25 (≈6.3); i = i+1 = 2+1 = 3; i<4 ⇒ 3<4 ⇒ да
z = (z+x/2)/2 = (6.25+14/2)/2 = 6.625 (≈6.7); i = i+1 = 3+1 = 4; i<4 ⇒ 4<4 ⇒ нет
Ответ: z = 6.625 (если округлять - 6.7)