М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
kalmanbaevarrr
kalmanbaevarrr
06.01.2020 10:55 •  Информатика

Автомат получает на вход пятизначное десятичное число. по полученному числу строится новое десятичное число по следующим правилам. 1. вычисляются два числа – сумма первой, третьей и пятой цифр и сумма второй и четвёртой цифр заданного числа. 2. полученные два числа записываются друг за другом в порядке невозрастания (без разделителей). пример. исходное число: 15177. поразрядные суммы: 9, 12. результат: 129. определите, сколько из ниже чисел могут получиться в результате работы автомата. 50 1510 150 1520 2015 1925 1015 215 2519 в ответе запишите только количество чисел

👇
Ответ:
Рита460
Рита460
06.01.2020
ответ 5

Код на Ruby

t = {}
for i in 10000..99999
    n, a, b, k =i, 0, 0, 0
    while n > 0
        k += 1
        a += n % 10 if k % 2 == 0
        b += n % 10 if k % 2 == 1
        n = n / 10
    end
    s = [a,b].max.to_s + [a,b].min.to_s

    next if  not ["50", "1510", "150", "1520", "2015", "1925", "1015", "215", "2519"].include?(s)
    if t[s] == nil then t.store(s, 1) else t[s] += 1 end
end
p t

вывод
{"50"=>15, "150"=>69, "1510"=>837, "2015"=>144, "215"=>168}
4,6(93 оценок)
Открыть все ответы
Ответ:
dan2013215671
dan2013215671
06.01.2020
Program abc;
Const 
n=3; 
m=3;
Var  a:array[1..n,1..m] of integer; 
b,y,i,j,sum:integer; 
srd:real; 
Begin 
Writeln('Введите числа массива: ');   
For i:=1 to n do     
For j:=1 to m do     
Begin       
Write('a[',i,',',j,']= ');       
 Readln(a[i,j]);       
if a[i,j]>0 then          
begin            
sum:=sum+a[i,j];           
inc(b);         
 end        
else         
If a[i,j]<0 then           
Inc(y);       
End;     
If sum>0 then     
begin      
srd:=sum/b;     
Writeln('Среднее =',srd);     
end    
 else     
Writeln('Нет положительных членов массива');     
If y>0 then     
begin      
Writeln('Количество отрицательных элементов =',y);     
end      
else     
Writeln('Нет отрицательных членов массива');
End.          
4,7(17 оценок)
Ответ:
Ivan208280
Ivan208280
06.01.2020


Решение 1:  Пусть N – искомое основание системы счисления. Так как запись числа 63 в системе счисления с основанием N содержит 3 цифры, то N2.<= 63 <N3 . Этому условию удовлетворяют числа N = 4, 5, 6, 7, 8.  Так как запись числа 63 в позиционной системе счисления с основанием  N заканчивается на 0, то N – делитель числа 63. Следовательно, N = 7.

Замечание. Можно сделать проверку – записать число 63 в 7-чной системе счисления. Имеем:

63:7  = 9 (ост 0);  9:7 =  1 (ост 2)  1:7  = 0 (ост 1)Вывод: 6310=1207
4,7(11 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ