Ниже записан алгоритм. Укажите
наименьшее из таких чисел x, при
вводе которых алгоритм печатает сначала 4, а потом 0.
var x, a,
b, c: integer;
begin
readln(x);
a:= 0; b:= 0;
while x > 0 do begin
c:= x mod 2;
if c = 0 then a:= a + 1
else b:= b + 1;
x:= x div 6;
end;
writeln(a);
writeln(b);
end.
Ответы
Ответ дал:
0
x=432
Пример на VBA Excel
Код программы можно посмотреть нажав Alt+F11
Пример на VBA Excel
Код программы можно посмотреть нажав Alt+F11
Приложения:
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад
9 лет назад