т.к. число не дано, то объясню как. Пишешь число, например 110 в десятично системе счисления и делишь всё время на 2, пока не дойдёшь до единицы(1). В ответе указываются те числа, которые у тебя в остатке. И писать ответ нужно строго наоборот, т.е.
если у тебя остатки 101010111, то надо написать 111010101
1)наполняем 8-ми литровый бидон и переливаем его в 5-ти литровый,таким образом в 8 л. остается 3 л.
2)освобождаем 5-ти литровый,и снова наливаем в него оставшиеся в том бидоне 3 литра
3)далее снова наполняем 8-ми литровый и доливаем из него в 5-ти литровый,и у нас остается 6 литров
4)затем снова освобождаем 5-ти литровый,и переливаем в него содержимое из 8-ми литрового,так как в нем было 6 литров,а мы перелили их в 5-ти литровый бидон,то теперь в 8-ми литровом остался 1 литр.
A = «Число 22 — чётное число» true (истина)
B =«Волк — травоядное животное» false (ложь)
Значения логического типа boolean занимают 1 байт и принимают одно из двух значений, задаваемых предопределенными константами True (истина) и False (ложь).
Ответ будет 5, так как массив начинается с нулевого элемента, то третьим будет 1, а первым будет 5
A[A[3]] = A[1] = 5
program q;
var
m:array[1..5] of integer;
sum, j:integer;
begin
sum:=0
for j=1 to 5 do
begin
write('введите ',j ,'элемент массива: ');
readln(m[j]);
sum:=sum+m[j]
end;
sum:=sum/5;
writeln(sum)
end.
