// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
var a:=ReadInteger('Яблок было');
var d:=ReadInteger('Детей гуляло');
Writeln('Каждый получил яблок: ',a div d);
Writeln('На компот пошло яблок: ',a mod d)
end.
<u><em>Тестовое решение:</em></u>
Яблок было 37
Детей гуляло 7
Каждый получил яблок: 5
На компот пошло яблок: 2
1-С) достоверность - отражает истинное положение дел
2-Е) точность - степень близости к реальному состоянию объекта
3-В) ценность - важность при решении задач
<span>4-D) понятность - </span>выраженность на языке доступном для получателя информации
<span>5-А) своевременность - </span>актуальность информации
Ответ:
if a>0 then
тут код
Я бы мог написать на питоне, нужно?