Var N,K:integer;
begin
write('Введите значение количество школьников N=');
readln(N);
write('Введите значение количество персиков K=');
readln(K);
writeln('Каждому школьнику достанется по ',K div N,' шт');
writeln('в корзине останется ',K mod N,' шт');
<span>end.</span>
<span><span /><span><span>
x
x1
</span><span>
2.00
2.69
</span><span>
2.20
3.99
</span><span>
2.40
5.37
</span><span>
2.60
6.74
</span><span>
2.80
7.95
</span><span>
3.00
8.92
</span><span>
3.20
9.59
</span><span>
3.40
9.94
</span><span>
3.60
10.02
</span><span>
3.80
9.90
</span><span>
4.00
9.71
</span></span></span>
Карта местности
а модель
схема прибора
Код Pascal (ABC, ABC.net):
Процессор
<span>сетевая карта
</span>оперативная память
<span>материнская плата
</span>видеокарта
<span>блок питания
</span><span>накопитель (дисковод)
</span><span>ПЗУ
ТО ЧТО Я НАШЁЛ)
</span>