ГБАВ
Здесь фишка в том, что числа в ip-адресе не могут превышать 256, вот и всё:) Удачи!
Ответ:
пред последние,вчера только по информатике проходили это
Var
x,f:real;
begin
Write('Введите x: '); Readln(x);
if (x>-2.4) and (x<5.7) then f:=sqr(x)
else f:=4;
Writeln('F=',f)
end.
var
x,f:real;
begin
Write('Введите x: '); Readln(x);
if (x>0.2) and (x<0.9) then f:=sin(x)
else f:=1;
Writeln('F=',f)
end.
var
a,b,c:real;
begin
Write('Введите три числа: '); Readln(a,b,c);
Write('Условие ',a,'<',b,'<',c);
if (b>a) and (b<c) then Writeln(' выполняется.')
else Writeln(' не выполняется.');
Write('Условие ',b,'>',a,'>',c);
if (a<b) and (a>c) then Writeln(' выполняется.')
else Writeln(' не выполняется.')
end.
Правильный вариант 3
Здесь мы объявляем массив из 8 элементов и присваиваем элементу с индексом 0 значение 0
Далее цикл идет, заполнения массива. Отметим, что цикл начинается с 1, т.е. со второго элемента(индексация в массивах с 0). Так же, массив до 8.
Т.е. мы заполним: 1,2,3,4,5,6,7 элементы. А 0 заполнили ранее. + формула совпадает с исходной.