Program _massiv;
var A:array[1..50] of real;
i,c:integer;
begin
writeln('Задайте количество членов линейного массива');
readln(c);
for i:=1 to c do begin
writeln('Введите',' ',i,' элемент массива');
readln(A[i]);
end;
for i:=1 to c do
writeln('Элемент массива ',i,' равен ',a[i]);
for i:=1 to c do
if A[i]=7.5 then writeln('Номер элемента массива, равный 7.5 ',i)
end.<span> </span>
Для начала переведем 11011110 в десятичную систему счисления
11011110(2)=222(10) следовательно 220>x
значит таких натуральных значений существует 219
Ответ: 219
9)вообще когда считал,получалось 128 бит,но увы там в ответе биты,значит самое оптимальное 64 бит,ответ Б
10) ответ 6,не буду расписывать,слишком долго,там из 25 вычитаешь 13 = 12 и из 12 по условию задачи бежишь
{
Периметр треугольника вычисляется по формуле P = a + b + c
где a, b, c - длины сторон треугольника
}
Program Perimetr;
var P, a,b,c:integer;
Begin
writeln('Введите длины сторон треугольника ');
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
P:= a+b+c;
writeln('Периметр треугольника = ', P);
end.