1. k=2; a=2;
2. 2<5 - да => a=2*2=4; k=2+2=4;
3. 4<5 - да => a=4*4=16; k=4+2=6;
4. 6<5 - нет
Ответ: 6
Var
n, a, b, c, d, s, p: integer;
begin
Write('Введите натуральное четырехзначное число: ');
Readln(n);
if (n > 9999) or (n < 1000) then Writeln('Число должно быть четырехзначным')
else begin
a := n div 1000; d := n mod 10; n := (n div 10) mod 100;
b := n div 10; c := n mod 10;
s := a + b + c + d;
p := a * b * c * d;
Writeln('Сумма цифр равна ', s, ', а их произведение равно ', p)
end
end.
<em><u>Тестовое решение:</u></em>
Введите натуральное четырехзначное число: 2345
Сумма цифр равна 14, а их произведение равно 120
В 4 ответ 3.
к сожалению в 5 не могу ничего понять.
Добрая-хорошая,гневная-вспыльчивая.
самый большое число номера месяца - 31. ближайшее число обозначающее целую степень двойки - это 32. подставим его в формулу
N=2^i, 32=2^i, 2^5=2^i отсюда i=5 бит следовательно, пятибитового кода будет достаточно для хранения информации о порядковом номере дня любого месяца в году