Почему после коррекции уровней гистограмма не сплошная, а состоит из отдельных полосок? Почему при сильном уменьшении яркости синего цвета фотография преоббретает желтоватый оттенок?
41)Создать новую таблицу 42) Д) 43)Правка - Удалить запись. 50) Параметры. 53)Выводится диалоговое окно с приглашением ввести параметр для условия на отбор записей. 56)Изменяются значения в полях определенных записей. 57)Создается таблица с данными, соответствующими определенным условиям. 62)Автоматической вставки последовательных или случайных чисел в качестве номера новой записи. 65)Во вкладке Режим таблиц – выбрать Вставить 66)Разные имена, но одинаковый тип данных. 69)Для отбора записей, данные в которых соответствуют определенным условиям. 70)Е) 71)Для создания контрольного переключателя.
42) Д)
43)Правка - Удалить запись.
50) Параметры.
53)Выводится диалоговое окно с приглашением ввести параметр для условия на отбор записей.
56)Изменяются значения в полях определенных записей.
57)Создается таблица с данными, соответствующими определенным условиям.
62)Автоматической вставки последовательных или случайных чисел в качестве номера новой записи.
65)Во вкладке Режим таблиц – выбрать Вставить
66)Разные имена, но одинаковый тип данных.
69)Для отбора записей, данные в которых соответствуют определенным условиям.
70)Е)
71)Для создания контрольного переключателя.
готово
Объяснение:
Задача 1
var
n: integer;
begin
Write('Введите чило >>> ');
ReadLn(n);
if n mod 2 = 0 then
WriteLn('четное')
else
WriteLn('нечетное')
end.
Задача 2
var
n: integer;
begin
Write('Введите год >> ');
ReadLn(n);
if (n mod 100) = 0 then
begin
if (n div 100) mod 4 = 0 then
WriteLn(n, ' год - високосный')
else
WriteLn(n, ' год - не високосный');
end
else
if n mod 4 = 0 then
WriteLn(n, ' год - високосный')
else
WriteLn(n, ' год - не високосный');
end.