Изобразите в окне цепочку бусин, для которых истины следующие утверждения: 1) в цепочке вторая бусина с конца красный квадрат. 2) в цепочке по середине зелёный квадрат. 3) первая и предпоследняя бусины одинаковые. 4) перед зеленым квадратом стоит красный треугольник. 5) последняя отличается от всех по форме, но того же цвета, что и средняя.

Вот так,как на фото
надеюсь

Красный квадрат ; красный треугольник ;зелёный квадрат ; красный квадрат ; зелёный кружок

1.Для начала нарисуйте основной контур корабля. Для будущего корпуса нарисуйте такую вот несложной формы контур, из которого мы и будем "строить" корабль.
2.Теперь нужно нарисовать основу мачт старинного деревянного корабля парусника. Для этого сначала нарисуйте две длинные вертикальные линии. Первая справа будет самая большая и левая чуть короче. Пометьте мачты корабля черточками в тех местах, где будут перекладины для парусов.
3.На этом этапе нужно нарисовать контуры парусов фрегата. Рисуйте их почти прямоугольной формы. На крайней правой мачте их будет три (треугольной формы). На средней мачте будет пять парусов, на последней мачте корабля тоже пять, но только меньшего размера.
4.Сейчас нам нужно будет нарисовать корму парусного корабля в деталях. Нарисуйте боковую линию кормы плавной линией, а также учтите, что задняя часть кормы должна располагаться чуть ниже по отношению к носовой части корабля. Выделите носовую часть еще одной вертикальной линией и нарисуйте продольные участки вдоль корпуса.
5.На этом этапе рисуем мачты и паруса нашего парусника более детально. Прежде всего, удалите ластиком предыдущие ненужные контуры основы корабля и мачт, а после прорисуйте окончательно форму всех парусов и мачт. Чтобы вам было легче это сделать, ориентируйтесь на мой рисунок.
6.Сейчас займемся парусами корабля "основательно" и натянем их полотнище ветром. Начнем с первой наклонной мачты. Эти паруса будут в виде треугольников. Придадим этим парусам небольшой изгиб от бокового ветра. Нарисуйте в деталях и основные паруса корабля. Для этого вертикальные прямые линии нужно заменить слегка изогнутыми. Это создаст впечатление дующего в паруса ветра, а заодно и движения корабля.
7.Если вы будете рисовать корабль только простым карандашом, то для нанесения теней используйте мягкий карандаш. Затените гормональные участки кормы. С теней мачты и паруса на рисунке станут объемными.

Program z1;
var
mas: array[1..100] of integer;
i,a,b,c,n,min: integer;
begin
a:=0;
min:=1000;
c:=0;
writeln('Введите количество элементов массива');
readln(n);
writeln('Введите элементы массива');
for i:=1 to n do
begin
read(mas[i]);
if mas[i]>0 then
a:=a+mas[i];
if mas[i]<min then
begin
min:=mas[i];
b:=i;
end;
if mas[i] mod 5=0 then
c:=c+1;
end;
writeln('Сумма положительных элементов массива равна ',a);
writeln('Номер наименьшего элемента массива равен ',b);
writeln('Количество элементов массива, кратных пяти, равно ',c);
end.