Вариант по икт

1)
Хор - Дирижер (управляемый - хор, управляющий - дирижер)
Поезд - Машинист (управляемый - поезд, управляющий - машинист)
Летчик - Самолет (управляемый - самолет, управляющий - летчик)
Спортсмен - Тренер/Спортсмен - Мяч (управляемый - спортсмен/мяч, управляющий - тренер/спортсмен)
Кинооператор - Режиссер/Кинооператор - Кинокамера (управляемый - кинооператор/кинокамера, управляющий - режиссер/кинооператор)

2) Понятность алгоритма означает, что алгоритм должен содержать только те команды, которые входят в набор команд, который может выполнить конкретный исполнитель

3) Циклический алгоритм – алгоритм, содержащий цикл, т. е., иными словами, циклический алгоритм - это описание действий, которые должны повторяться указанное число раз или пока не выполнено заданное условие.

4) Сие задание я, к сожалению, не совсем понял. Если блок-схема нужна (и сойдёт практически любая), то см. прикреплённое изображение.

5) a=25; b=105; c=15; x=35

6)
Program P1;
uses crt;
var a, b, c, d, p, sum1, sum2: real;
begin
clrscr;
write ('Введите 1-ое число: ');
readln (a);
write ('Введите 2-ое число: ');
readln (b);
write ('Введите 3-е число: ');
readln (c);
write ('Введите 4-ое число: ');
readln (d);
sum1:=a+d;
sum2:=b+c;
p:=sum1*sum2;
write ('Произведение: ', p);
readkey;
end.

7)
Program P1;
uses crt;
var max, min, x, y: real;
begin
clrscr;
writeln ('Введите числа x и y, не равные друг другу.');
write ('Введите значение x: x=');
readln (x);
write ('Введите значение y: y=');
readln (y);
if x=y then write ('Ошибка: Введённые числа равны. Программа завершена.') else begin
if x<y then begin
max:=y;
min:=x;
x:=(min+max)/2;
y:=min*max*2;
end else begin
max:=x;
min:=y;
x:=min*max*2;
y:=(min+max)/2;
end;
end;
write ('Ответ: x=', x, '; y=', y);
readkey;
end.