Обозначим Б - число быков, К - число коров, Т - число телят. Тогда можно записать, что Б+К+Т=100 (1) 10Б+5К+0.5Т=100 (2) Из (2) найдем ограничения на количества Б, К, и Т. Б ∈ [0;10], К ∈ [0;20]. Из (1) находим, что Т=100-Б-К, Т - четное (иначе сумма не будет целой). Эти ограничения позволят правильно построить циклы в программе.
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018 Внимание! Если программа не работает, обновите версию!
begin for var Б:=0 to 10 do for var K:=0 to 20 do begin var T:=100-Б-K; // из уравнения (1) if T.IsEven and (10*Б+5*K+T div 2=100) then Writeln(Б,'Б, ',K,'K, ',T,'T') end end.
То есть, целое число может занимать, например, один байт, два или четыре байта. Число, которое занимает 1 байт( 8 бит ), может принимать значения от нуля то 255, то есть 2^8 = 256 чисел (до 255, потому что ноль - тоже число). Если прибавить к однобайтному числу 256, в нём сохранится 0 (каждый раз, когда происходит выход за границу диапазона - счёт начинается с нуля). То есть, и если прибавить 513, в числе сохраница единица. Если число занимает 2 байта, его диапазон 2^16 = 32767. Четыре байта - диапазон [0..4294967295].
2. Точностью хранимых в нём чисел (количество значащих разрядов), и диапазоном.
То есть, например, переменная вещественного типа может занимать в памяти 4 байта, и при этом в нём может храниться число 1.23 * 10^35. То есть в 4-х байтах целого типа можно хранить числа не больше 4294967295, а в 4-х байтах вещественного типа - в несколько десятков раз больше. Это возможно потому, что хранится не всё число, в только первые несколько значащих цифр. В 4-байтной вещественной переменной могут храниться числа [-3.4∙10³⁸ .. 3.4∙10³⁸], при этом количество значащих разрядов в нём всего 7-8(часть бит из этих 4 байт отводится для хранения степени 10).
Тогда можно записать, что
Б+К+Т=100 (1)
10Б+5К+0.5Т=100 (2)
Из (2) найдем ограничения на количества Б, К, и Т.
Б ∈ [0;10], К ∈ [0;20].
Из (1) находим, что Т=100-Б-К, Т - четное (иначе сумма не будет целой).
Эти ограничения позволят правильно построить циклы в программе.
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
for var Б:=0 to 10 do
for var K:=0 to 20 do begin
var T:=100-Б-K; // из уравнения (1)
if T.IsEven and (10*Б+5*K+T div 2=100) then
Writeln(Б,'Б, ',K,'K, ',T,'T')
end
end.
Результат
1Б, 9K, 90T
То есть, целое число может занимать, например, один байт, два или четыре байта. Число, которое занимает 1 байт( 8 бит ), может принимать значения от нуля то 255, то есть 2^8 = 256 чисел (до 255, потому что ноль - тоже число). Если прибавить к однобайтному числу 256, в нём сохранится 0 (каждый раз, когда происходит выход за границу диапазона - счёт начинается с нуля). То есть, и если прибавить 513, в числе сохраница единица.
Если число занимает 2 байта, его диапазон 2^16 = 32767. Четыре байта - диапазон [0..4294967295].
2. Точностью хранимых в нём чисел (количество значащих разрядов), и диапазоном.
То есть, например, переменная вещественного типа может занимать в памяти 4 байта, и при этом в нём может храниться число 1.23 * 10^35.
То есть в 4-х байтах целого типа можно хранить числа не больше 4294967295, а в 4-х байтах вещественного типа - в несколько десятков раз больше.
Это возможно потому, что хранится не всё число, в только первые несколько значащих цифр. В 4-байтной вещественной переменной могут храниться числа [-3.4∙10³⁸ .. 3.4∙10³⁸], при этом количество значащих разрядов в нём всего 7-8(часть бит из этих 4 байт отводится для хранения степени 10).