ответить на вопросы по инфоматике 4. Какие типы триггеров по записи информации вам
известны?
5. Какие типы триггеров по моменту реакции на тактовый сигнал
вам известны?
6. Какие управляющие сигналы триггеров вам известны?
7. Какие информационный сигналы триггеров вам известны?
Какие для каких типов?
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()
a, b, c, p: real;
a1, b1, c1: real;
a2, b2, c2: real;
function SideLength(a1, a2, b1, b2: real): real;
begin
SideLength := sqrt(sqr(a1 - b1) + sqr(a2 - b2));
end;
begin
writeln('1.Найти сумму трех чисел');
readln(a, b, c);
writeln(a + b + c);
writeln('2.Катеты прямоугольного треугольника известны.Найти гипотенузу.');
readln(a, b);
writeln(sqrt(a * a + b * b));
writeln('3.Найти среднеарифметическое двух чисел.');
readln(a, b);
writeln((a + b) / 2);
writeln('4.Найти длину окружности,если известна площадь круга.');
readln(a);
writeln(sqrt(a / pi) * 2 * pi);
writeln('5.Какой процент составляет число а от числа b.');
readln(a, b);
writeln(a / b * 100);
writeln('6.Найдите площадь треугольника с формулы Герона.');
readln(a, b, c);
p := (a + b + c) / 2;
writeln(sqrt((p - a) * (p - b) * (p - c) * p));
writeln('7.Найдите площадь кольца,если его толщина I см,диаметр внутри круга d см.');
readln(a, b);
c := a + b;
writeln(pi * (c * c - b * b));
writeln('8.Вычислите площадь треугольника заданного координатами вершин.');
readln(a1, a2, b1, b2, c1, c2);
writeln(((a1 - c1) * (b2 - c2) - (a2 - c2) * (b1 - c1)) / 2);
writeln('9.Вычислить длинны сторон треугольника по заданным координатам его вершин.');
a := SideLength(a1, a2, b1, b2);
b := SideLength(c1, c2, b1, b2);
c := SideLength(a1, a2, c1, c2);
writeln(a, ' ', b, ' ', c);
end.