А) составить программу на паскале, в которой вычисляется выражение 3*7 div 2 mod 7/3 - trunc (sin(1))
б) составить программу на паскале для (фото прикрепила)​

Объяснение:

Из задания не совсем ясно, необходимо ли в программе производить ввод массиве, если нет, то решение следующее:

# Максимальный элемент массива

_max = max(d)

# Порядковый номер элемента

_index = d.index(_max)

# Вывод

print(_max, _index)

Если запрещено использовать встроенные функции, то:

# первый элемент - максимальный

_max = d[0]

_index = 0

# Цикл по всем элементам

for i, x in enumerate(d):

# Если элемент больше максимального

if x > _max:

_max = x

_index = i

# Вывод

print(_max, _index)

Если необходимо произвести и ввод, то в начале задачи надо дописать:

n = input('Введите n: ')

d = []

for x in range(n):

d.append(input('Введите число: '))

a) код:

from turtle import *

a = [[0,80],[80,26],[50,-68],[-50,-68],[-80,26]]

t = Turtle()

t.screen.setup(500, 500)

t.pencolor('#BE8097')

t.screen.bgcolor("#98E585")

t.pensize(3)

t.up()

for i in a:

   t.goto(i[0],i[1])

   t.down()

   for j in range(2):

       t.fd(60)

       t.lt(36)

       t.bk(60)

       t.lt(36)

   t.fd(60)

   t.rt(144)

   t.up()

t.screen.exitonclick()

t.screen.mainloop()

b) код:

from turtle import *

t = Turtle('turtle')

t.screen.setup(800, 800)

t.pencolor('blue')

t.screen.bgcolor("#98E585")

for i in range(0,360,30):

   t = Turtle('turtle')

   t.up()

   t.pensize(3)

   t.pencolor('#0324FD')

   t.lt(i)

   t.fd(100)

   t.down()

   t.fd(10)

   t.up()

   t.fd(20)

t.screen.exitonclick()

t.screen.mainloop()