begin p := 1; s := 0; read(n); while n > 0 do begin if(n div 10 <= 0) then s := (n mod 10); p := p * (n mod 10); n := n div 10; end; if(s <> p) then write('В ', p / s, ' раз') else write('В ', 0, ' раз') ; end.
oknacrow
03.05.2022
1.Алфави́т (греч. ἀλφάβητος), также а́збука, — форма письменности, основанная на стандартном наборе знаков. 2.Мощность алфавита - это количество символов, из которых состоит алфавит. Например, мощность русского алфавита - 33 символа. 3.по формуле.. 4.каждый символ может иметь 64 значения,то есть,то на каждый символ выделяется 6 бит(от 0 до 63,всего 64 варианта).Всего символов- 100. Значит все нужно 6 *100=600бит=75байт. 5.Один символ (включая пробел) = 1 байт перевод в байты - 3.5 Кб * 1024 байт = 3584 байт Количество символов - 3584 6.В первом тексте информационный объем одного символа состовляет: N=2^i 32=2^5 i=5 бит Во втором тексте: 64=2^6 i=6 Значит,в 1,2 раза (6:5=1,2)
pokrov777krest
03.05.2022
Объясняю.За ответ отметить 1)сначала подставим значения в выражение: НЕ(3больше2) и НЕ(3=5) 2)запишем значения выражения: 0 и 1 3)И-это связка &,в алгебре логики(информатика,9 класс) это у нас знак конъюнкции. Определение:конъюнкция-логическое умножение. Т.е. если все входящие переменные истинны(равны 1,ноль это ложь,а 1-истина),то и конъюнкция истинна. Из выражения "не(X>Z)и не(X=Y), если X=3, Y=5, Z=2" мы имеем: 0 & 1. 0 не равен единице,из этого следует,что здесь конъюнкция ложна. Кроме конъюнкции действий нет,а это значит,что она-это всё выражение.Если конъюнкция здесь ложная,то и выражение ложное,соотв.оно имеет значение 0. ответ:0
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Дано натуральное число n. определить, во сколько раз произведение всех цифр заданного числа больше его первой цифры. написать программу в паскале.
n, i, p, s: integer;
begin
p := 1;
s := 0;
read(n);
while n > 0 do
begin
if(n div 10 <= 0) then s := (n mod 10);
p := p * (n mod 10);
n := n div 10;
end;
if(s <> p) then write('В ', p / s, ' раз')
else write('В ', 0, ' раз') ;
end.