ответить на вопросы 1. Напишите определение понятию «растровой графики».
2. Опишите достоинства и недостатки растровой графики.
3. Дайте определение параметру разрешение изображения.
4. Как можно закодировать цвет? Приведите пример.
5. Опишите форматы файлов растровой графики.
6. Опишите систему, основанную на смешении излучений.
7. Опишите систему, основанную на вычитании излучений.
8. Опишите аппаратно-независимые цветовые пространства.
9. Как можно рассчитать цветовые различия?
10. Опишите структурные свойства изображений.
11. Опишите реализацию ввода графической информации.
12. Опишите виды и печати.
i: integer;
label 1, 2, 3, 4;
begin
1:
Writeln('1)Периметр квадрата');
Writeln('2)Площадь равностороннего треугольника');
Write('Ваш выбор >>> ');
Read(n);
Writeln('');
if n = 1 then
begin
2:
Write('Введите площадь кварата >>> ');
Read(s);
if s < 0 then
begin
Writeln('Некорректный ввод');
Writeln('');
goto 2;
end;
a := Sqrt(s) * 4;
Writeln('');
Writeln('Периметр квадрата >>> ', a);
goto 4;
end
else
if n = 2 then
begin
3:
Write('Введите периметр равностороннего треугольника >>> ');
Read(a);
if a < 0 then
begin
Writeln('Некорректный ввод');
Writeln('');
goto 3;
end;
s := (sqrt(3) / 4) * Sqr(a/3);
Writeln('');
Writeln('Площадь равностороннего треугольника >>> ', s);
goto 4;
end
else
begin
Writeln('Некорректный ввод');
Writeln('');
goto 1;
end;
4:
Writeln('');
Writeln('1)Заного');
Writeln('2)Выйти');
Write('Ваш выбор >>> ');
Read(n);
Writeln('');
if n = 1 then
goto 1 ;
else
exit;
end.