Информатика. пишу программу пишет ошибку. не могу понять что не так? подскажите что нужно сделать? Даю 20б
var
n1,n2,n3:integer;
begin
write('Ввод n1,n2,n3,');
read (n1,n2,n3);
if (n1n3)
then max:=n1 else begin if n2>n3
then buf:=n2; min:=n3 else buf:=n3;min:=n2
else begin if(n2>n1) and (n2>n3)
then max:=n2 begin if n1>n3 then
buf:=n1;min:=n3 else buf:=n3;min:=n1
else begin if n1>n2
then buf:=n1;min:=n2
else buf:=n2;min:=n1;
end;
end;
end;
end;
end.
.
БВГА
Объяснение:
18 4.2 26.73 .62
под буквой А мы видим «.62». Число, на которое указывает этот фрагмент, начинается с 62. Так как числа в IP-адресе не могут быть больше 255, мы не можем добавить в конце этого числа еще один разряд, а фрагментов, начинающихся с точки, больше нет, следовательно, этот фрагмент – последний.
Посмотрим на фрагмент под буквой Б. В нем стоит число без точек, значит, это либо последний фрагмент, либо первый. Место последнего фрагмента уже занято, значит, фрагмент Б на первом месте.
В конце фрагмента Г - число 73, отделенное точкой. Так как в IP-адресе не может быть числа, большего 255, то за фрагментом Г должен следовать фрагмент, начинающийся с точки. Значит, фрагмент Г идет перед фрагментом А.
1. При выполнения цикла каждая из троек 8 будет заменена на одну 9. Значит у нас получится строка длиной в 334 символа, где 333 девятки и последний символ - восьмерка
2. Далее 333 девятки заменятся на 111 восьмерок плюс последняя восьмерка - всего получим 112 восьмерок
3. Из 112 восьмерок получится 37 девяток и одна восьмерка
4. И 37 девяток получим 12 восьмерок плюс одна девятка и плюс последняя восьмерка
5. 12 восьмерок дадут 4 девятки плюс последние 9 и 8
6. И наконец получаем строку 8998
ответ: 8998