1) панель инструментов, главное меню, поле документа, строка состояния
2) изменить, копировать, вставить, вырезать, удалить, отменить
3) палитра, кисть, выделение цвета, эффекты, слои, холст
4) сбор данных
оценка качества данных
ввод данных в различные информационные системы
ручной ввод данных
накопление данных
сортировка данных
классификация данных
поиск нужных данных в накопленных массивах данных
контроль доступа и защита данных
упаковка данных
маркировка данных
надёжность передачи данных
табличное представление данных
графическое представление данных
визуальное представление данных
var
a : array [1..100] of real;
n, i : integer;
begin
read (n);
for i := 1 to n do read (a[i]);
for i := 1 to n do
if a[i] <= 0 then
begin
writeln ('NO');
readln;
Halt;
end;
writeln ('YES');
readln;
end.
var
a : array [1..100] of real;
n, i : integer;
o : real;
begin
read (n);
for i := 1 to n do read (a[i]);
o := a[1];
for i := 2 to n do
if a[i] <> o then
begin
writeln ('NO');
readln;
Halt;
end;
writeln ('YES');
readln;
end.
var
a : array [1..100] of real;
n, i : integer;
x : real;
begin
read (n);
for i := 1 to n do read (a[i]);
read (x);
for i := 1 to n do
if a[i] = x then
begin
writeln ('YES');
readln;
Halt;
end;
writeln ('NO');
readln;
end.
