Var a,b: integer; begin write('введите два числа: '); readln(a,b); a: =a+b; if a mod 5 = 0 then a: =a+1 else a: =a-2; writeln(a); end. введите два числа: 17 13 31
Спасибо
Ответ дал: Гость
1. первая правая цифра числа показывает число единиц, вторая - число двоек (1·2) , третья - число четверок (2·2), четвертая - число восьмерок (4·2) и т.д. имеем:
2. число нужно поделить на два, найти остаток. полученный результат снова поделить на два и найти остаток и т.д. остатки, записанные в обратном порядке и есть запись в двоичном исчислении.
65÷2 = 32 (ост.1)
32÷2 = 16 (ост.0)
16÷2 = 8 (ост.0)
8÷2 = 4 (ост.0)
4÷2 = 2 (ост.0)
2÷2 = 1 (ост.0)
1÷2 = 0 (ост.1)
65₁₀ = 1000001₂
Ответ дал: Гость
сначала взять кирпич-взять цемент- налить уемент- положить на цемент кирпич. и т.к
Популярные вопросы