Запись алгоритма в виде блок-схемы более наглядная и компактная.
1)
var x,y : integer;
begin
read (x);
y := 5 * x * x + 16 * x * x + 18 * x - 29;
write (y);
end.
2)
var a,b : integer;
c,p,s : real;
begin
readln (a,b);c := sqrt(a*a + b*b);
p := a + b + c;s := (a*b)/2;
write ('Периметр равен ',p,', площадь равна ',s, '.');
end.
3)
var a,b,c : integer;
begin
readln (a,b,c);
write ((a+b)/(a-b) + sqrt(c/2));
end.
1) 1,2
2) 2
3) 3
4) 4
5) 1, 3, 6
6) 2, 3, 4, 6, 7
7) Совокупность взаимосвязанных явлений, процессов, работ, образующих законченный круг развития в течение какого-л. промежутка времени
8) 1, 3, 4, 5, 8
16) 2, 3, 5
17) 1, 2
Исходные отношения не связаны. Необходимые поля для связи добавлены (см. вложение). Примечание: PK - Primary Key (первичный ключ).