-75.223 = <span>-1001011.00111001000 (2)
- = 1
1.00101100111001000 * 10^6
^6 = ^110
110 * 1111111 = </span>1111010 мантисса
ответ
1 111<span>1010</span> 001011001110010000000000
1.
var
a,k,i,c: integer;
begin
c:=0;
write('Введите количество чисел в последовательности: ');
readln(k);
for i := 1 to k do
begin
write('Введите число: ');
readln(a);
if (a mod 2 = 1) and (a mod 10 <> 1) then c:=c+1
end;
if c>0 then writeln('YES')
else writeln('NO')
end.
2.
var
a,k,i,c: integer;
begin
c:=0;
write('Введите количество чисел в последовательности: ');
readln(k);
for i := 1 to k do
begin
write('Введите число: ');
readln(a);
if (a mod 2 = 1) and (a mod 3 = 0) then c:=c+1
end;
writeln(c)
end.
1)Никогда не следует возвращаться туда, где был счастливым. - прид. места
2)Очнулся он, когда солнце стояло уже высоко. -прид .времени
3)Я вышел, чтобы освежиться--прид. цели
4)Дедушка пел так, как поет народ -- прид. образа действия
5)Если завтра будет такая же погода, то утром поеду в город -- прид. условия
Код Pascal (ABC, ABC.net):
Персональный компьютер лишний,потому что,там говорится о размерах компьютера,а это просто персональный.