В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
cherryyy777
cherryyy777
12.11.2020 12:46 •  Информатика

Решить. (заранее )
«представление чисел в компьютере»

1)если число отрицательное, то в знаковый разряд помещается

1)+
2)1
3)0
4)-

2)числом в нормальной форме с нормализованной мантиссой (правильной дробью, имеющей после запятой цифру, отличную от нуля) является:

а)0,401 x 10^7
б)7815
в)0,03428
г)2783,00029

3)беззнаковым 8-разрядным представлением числа 45^10 является:

а)00101101
б)101101
в)101
г)10110100

4)какие из чисел можно сохранить в 8-разрядном беззнаковом формате?

а)646^8
б)0^2
в)1a^16
г)257^10

5)укажите число, записанное в естественной форме

а)среди предложенных вариантов нет числа в естественной форме
б)95400611 x 10^2
в)1,784824e+5
г)2010,0102

6)укажите десятичный эквивалент числа, прямой код которого 00010101 записан в 8-разрядном формате со знаком:

а)34
б)верного ответа в предложенных вариантах нет
в)21
г)-21

7)при записи числа в форме a= \pmm x qp
q – это …

а)само вещественное число
б)порядок числа
в)основание системы счисления
г)мантисса

Показать ответ
Ответ:
StEInN2
StEInN2
18.03.2020 10:57

javascript: function Пр(ч) { var стр = ч.toString(); for (let сч = 1; сч < стр.length; сч++) { let ч1 = parseInt(стр.substring(0, сч)), ч2 = parseInt(стр.substring(сч)); if (ч1 > ч2) continue; let к1 = Math.sqrt(ч1), к2 = Math.sqrt(ч2); if (к1 == Math.floor(к1)) { for (let сч1 = 1; сч1 < 10 && сч1 < ч2 - 1; сч1++) for (let сч2 = 1; сч2 * сч2 + сч1 * сч1 <= ч2; сч2++) if (сч2 * сч2 + сч1 * сч1 == ч2 && Math.pow(сч1 + сч2, 2) == ч1) return ч + ": " + сч1 + ", " + сч2; } if (к2 == Math.floor(к2)) { for (let сч1 = 1; сч1 < 10 && сч1 < ч1 - 1; сч1++) for (let сч2 = 1; сч2 * сч2 + сч1 * сч1 <= ч1; сч2++) if (сч2 * сч2 + сч1 * сч1 == ч1 && Math.pow(сч1 + сч2, 2) == ч2) return ч + ": " + сч1 + сч2; } }; return ч + ": -"; } [2949, 10, 11, 25, 95, 2036, 3264, 6581].forEach(function (зн) { alert(Пр(зн)); });

0,0(0 оценок)
Ответ:
taylakova090820
taylakova090820
07.07.2020 18:13
PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018Внимание! Если программа не работает, обновите версию!

begin

 SeqGen(10, 6, t -> t + 6).Aggregate(int64(1), (p, q)-> p * q).Println;

 SeqGen(25, 7, t -> t + 7).Sum.Println

end.

Результат219419659468800 2275 2) "Школярский вариант"

(для тех, у кого учителя в развитии застряли в Паскале образца 1983 года)

var

 i, s: integer;

 p: real;


begin

 p := 1;

 for i := 1 to 10 do

   p := p * i * 6;

 Writeln(p);

 s := 0;

 for i := 1 to 25 do

   s := s + i * 7;

 Writeln(s)

end.

3) "Школопетский вариант"

(для тех, у кого голова, чтобы "в нее кушать")

var

 i, s, n: integer;

 p: real;


begin

 p := 1;

 n := 0;

 i := 1;

 while n < 10 do

 begin

   if i mod 6 = 0 then

   begin

     p := p * i;

     Inc(n)

   end;

   inc(i)

 end;

 Writeln(p);

 s := 0;

 n := 0;

 i := 1;

 while n < 25 do

 begin

   if i mod 7 = 0 then

   begin

     s := s + i;

     Inc(n)

   end;

   inc(i)

 end;

 Writeln(s)

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота