Я же писала:
(Oldschool) Сейчас на .css всё не совсем так. Но:
1) Поле ввода текста <INPUT type=text> представляет собой прямоугольное поле, предназначенное для ввода одной строки текста.
2) Флажки <INPUT type=checkbox>, или кнопки с независимой фиксацией, служат для многокомпонентного выбора.
3) Контейнер <SELECT>…</SELECT> используется для создания раскрывающегося списка
4) Контейнер <TEXTAREA>…</TEXTAREA> задает многострочное текстовое окно.
Uses crt;
var a,b,n,i:integer;
mas:array[1..100] of integer;
begin
textcolor(white);
writeln('Введите a,b,n:');
read(a,b,n);
writeln('Введите элементы массива:');
for i:=1 to n do
read(mas[i]);
for i:=1 to n do
begin
if (mas[i]>a) and (mas[i]<b) then
textcolor(yellow)
else
textcolor(white);
write(mas[i],' ');
end;
textcolor(white);
<span>end.</span>
Рассматриваем <span>IP адрес: 215628319, начиная с конца и помня, что октет не может содержать число большее 255.
Слева-направо выделяем октеты: 19 (319>255 - нельзя), 83, 62, 215.
Получаем единственно возможный адрес 215.62.83.19
</span>
Сначала
2х2 равно 4, следовательно, А истинно. Обозначим истинное, как 1.
2х2 не равно 5, следовательно, В ложно. Обозначим ложное, как 0.
Тогда:
not(A and B) = not(1 and 0) = not 0 = 1, т.е. высказывание истинно.
A or not B = 1 or not 0 = 1 or 1 = 1, т.е. высказывание истинно.
Var i,k,n:integer;
a,b:array[1..100] of integer;
begin
readln(n);
for i:=1 to n do
begin
readln(a[i]);
if a[i]<0 then
begin
b[k]:=a[i];
k:=k+1;
end;
end;
write('Элементы: ');
for i:=1 to k-1 do write(b[i],' ');
writeln;
writeln('Колличество отрицательных=',k-1);
<span>end.</span>