с маленьким тестом по информатике, 1) Для чего в Word можно использовать команды работы с буфером обмена? 1.обмен информацией 2.использование автотекста 3.копирования информации в другие документы 2) Какой вид списка является неправильным? 1.многоуровневый 2.маркированный 3.многопользовательский 4.нумерованный 3) При выявлении неправомерной обработки персональных данных, если невозможно обеспечить ее правомерность срок уничтожения: 1.в течение 7 рабочих дней с даты выявления 2.в течение 13 рабочих дней с даты выявления 3.в течение 10 рабочих дней с даты выявления 4) Какой сервис обеспечивает удаленное управление компьютером: 1.telnet 2.fth 3.BBS 5) Каков мотив хакерской атаки, организованной по политическим убеждениям?

int1 = int(input())

int2 = int(input())

col1 = int(input())

col2 = int(input())

min1 = col1 + int1 * (col1 - 1 ) # Минимальное время которое она находились на платформе, согласно условиям 1 стороны платформы

max2 = col1 + int1 * (col1 + 1 ) # Максимальное время которое она находились на платформе, согласно условиям 1 стороны платформы

min1 = col2 + int2 * (col2 - 1 ) # Минимальное время которое она находились на платформе, согласно условиям 2 стороны платформы

max2 = col2 + int2 * (col2 + 1 ) # Максимальное время которое она находились на платформе, согласно условиям 2 стороны платформы

if min1 > min2 : # Находим общий минимум для обеих сторон плафтормы. Это максимальное из двух значений

totalmin = min1

else :

totalmin = min2

if max1 > max2 : # Находим общий максимум для обеих сторон плафтормы. Это минимальное из двух значений

totalmax = max2

else : # Важно помнить Минимум максимален и постепенно уменьшается. Максимум минимален и постепенно растет

totalmax = max1

if totalmin > totalmax : # Если Минимальное время больше чем максимальное, то , ошибка в подсчете, во всех других случаях интервал существует

print(-1)

else :

print(totalmin , totalmax)

# это пояснение кода, не участвующее в программе

1)
Var a,b,c:integer; x1,x2,d:real;
Begin
 write('a='); readln(a);
 write('b='); readln(b);
 write('c='); readln(c);
 d:=sqr(b)-(4*a*c);
 x1:=(-b+sqrt(d))/(2*a);
 x1:=(-b-sqrt(d))/(2*a);
 writeln('x1=',x1:0:2);
 writeln('x2=',x2:0:2);
End.

2)
Var x,i,s,n,d:integer;
Begin
 write('Введите первый элемент прогрессии: '); readln(x);
 write('Введите количество элементов в прогрессии: '); readln(n);
 write('Введите знаменатель прогрессии: '); readln(d);
 s:=0;
 for i:=1 to n do
   begin
    s:=s+x;
    x:=x+d;
   end;
 writeln('Сумма элементов арифметической прогрессии равна ',s);
End.