Переведем 30 (10)<span> в двоичную систему вот так:</span>
<span>Целая часть числа находится делением на основание новой :(на фото)</span>
<span>
</span>
Получилось:<span>30 (10) = 11110 (2)</span><span> </span>
Var
i,n:integer;
begin
read(n);
for i := 1 to n do
if (i mod 2) * (i mod 3) * (i mod 5) = 0 then
write(i,' ')
<span>end.</span>
Var a,b,d,m:integer;
begin
writeln('Введите два числа:');
write('a = '); readln(a);
write('b = '); readln(b);
d:=a div b;
m:=a mod b;
writeln('D = ',d);
writeln('M = ',m);
end.
Пример:
Введите два числа:
a = 16
b = 6
D = 2
M = 4
Информа́ция (от лат. informātiō «разъяснение, представление, понятие о чём-либо» ← informare «придавать вид, форму, обучать; мыслить, воображать) — сведения независимо от формы их представления
текстовая графическая звуковая числовая
хранение обработка передача создание -информация
текстовая-повесть
графическая-новогодняя открытка
календарь-числовая
звуковая-гудок авто
Необходимо отсчитать 5 раз по 3 минуты = 15 минут, одновременно переворачивать 2 раза по 8 минут. когда 15 минут пройдут, в больших часах остается 1 минута, она заканчивается и переворачиваете часы с 3 минутами 2 раза и того получится 1+3+3=7 минут. задача решена