Program n;
var a,b,c,d:integer;
begin
writeln('Введите трехзначное число');
readln(d);
a:=dmod10;
d:=ddiv10;
b:=dmod10;
c:=ddiv10;
if adiv9=1 then
writeln('da');
if bdiv9=1
then writeln('da');
if cdiv9=1 then writeln('da') else writeln('no');
end.
(проверь ее)
Код Щ = 1xyz0
больше всего походит на Ш 11000, и чтоб было 3 позиции различия, то будет 1xyz0 = 10110
проверим колво различий с остальными
Ц: 01111 vs <span>10110 = 3 различия </span>
Ч: 00001 vs 10110 = 4 различия
Ответ 10110
1)
var max, min, i, n : integer;
a : array [1..255] of integer;
BEGIN
// ввод массива
read(n);
for i := 1 to n do
read(a[i]);
// то, что в блок-схеме
max := a[1]; min := a[1];
for i := 2 to n do begin
if a[i] < min then
min := a[i]
else if a[i] > max then
max := a[i];
end;
write(min, ' ', max);
END.
2) Если k - это любое число >= 1, то значения элементов массива сдвинутся на 1 влево. К примеру, если k = 1, то a[1] = 12, a[2] = 5, a[3] = 8 и так далее
А истинно
В ложно
С ложно (у вершины дерева м.б. только 1 предыд.вер.)
Е- истинно
F-истинно
G -только волк и гусь
H- ложно
D-да(лошадь)
J-истинно
K-ложь