На схеме цифрами указана очередность выводов.
1. Саша делал модель самолета "Су".
2. Саша делал модель из белой пластмассы.
3-5. Получилось три модели "Ту" и одна "Су", следовательно остальные делали модели "Ту".
6. Саша и Андрей делали модели из пластмассы разного цвета, следовательно Андрей делал модель и серой пластмассы.
7. Саша и Толя делали модели из пластмассы разного цвета, следовательно Толя делал модель и серой пластмассы.
8. Двое делали модели из белой пластмассы, а двое из серой. Следовательно, Витя делал модель из белой пластмассы.
Можно использовать другие команды? Например Trunc?
Если да, то вот:
var i,j,n:integer;
s:real;
begin
readln(i,j);
s:=i/j;
n:=i-j*Trunc(s); {Функция Trunc выделяет целую часть}
writeln(n);
<span>end.
Если нельзя пользоваться Trunc, то вот другое решение:
var i,j:integer;
s,m:real;
begin
readln(i,j);
m:=i/j;
s:=m;
while s>=1 do s:=s-1;
m:=m-s
;writeln(i-j*m;);
<span>end.</span></span>
Как-то так... )))
Смотри картинки...
Первая - вид формул, вторая - значения...
Число 512 в шестнадцатеричной системе счисления (HEX): 000200.