1100100
я это сделал в калькуляторе
если калькулятор на компе то берёшь открываешь калькулятор пишешь 100 сверху есть опции: вид правка справка заходишь в вид выбираешь программист и потом выбираешь справа bin
10101+111=10212
10101-111=9990
10101*111=1121211
10101:111=91
<span>program z1;
Var v,S:Integer; t:real;
Begin
v:=12;
WriteLn('Известно что мальчик бегает в 3 раза больше чем ходит');
WriteLn('3 км/ч его ходьба, следовательно 12 км/ч его бег');
Write('Введите кол-во километров прбегаемых мальчиков: ');
Read(S);
t:=S/v;
WriteLn('Время потраченое мальчиком на пробежку = ',t,' час(ов)');
end.
</span>
Начало
Сними трубку
набери номер
дождись гудка
гудки длинные?
передай сообщение
дождись ответа
положи трубку
конец
в ромбе всегда стоит вопрос.