1. Зачем нужны 2 рабочих цвета?
2. В каких случаях может быть залито всё поле рисунка? Как это исправить?
3. Изменяются ли при масштабировании размеры рисунка в пикселях?
4. Как можно редактировать текст, который уже зафиксирован в растровом рисунке?
5. Чем отличается рисование фигур с левой и правой кнопок мыши?
6. Как нарисовать только контур фигуры (без заливки)?
7. Как нарисовать фигуру без контура?
8. Как нарисовать круг, если вы знаете координаты его центра и радиус?
9. Почему уже нарисованную фигуру сложно переместить?
ОТВЕТЬТЕ СКОРЕЕ ОЧЕНЬ НУЖНО
i, n: integer; // объявление целочисленных переменных
begin
// Запросим с клавиатуры размер массива
// и запишем его в переменную n
write('введите n:');
readln(n);
// Теперь выделим память под n элементов массива
SetLength(a, n);
// теперь запросим с клавиатуры n чисел для массива
for i := 0 to n-1 do begin
write('a[', i, ']=');
readln(a[i]);
end;
// теперь в цикле уменьшим каждый элемент на единицу
for i := 0 to n-1 do
a[i] := a[i] - 1;
// распечатаем массив
for i := 0 to n-1 do
write(a[i], ' ');
end.