Около стены наклонно стоит палка на высоте h метров. Нижний конец палки находится на расстоянии уметров от стены. Определить является ли треугольник, образованный стеной и палкой, равнобедренным. Если - да, то вывести об этом информацию и угол, образованный междустеной и палкой. Иначе вывести информацию об угле, образованном стеной и палкой: больше или меньше 45 градусов.

На паскале

program zadanije_tri;

var a, b, c:integer;

begin

 writeln('Введите первое число.');

 readln(a);

 writeln('Введите второе число.');

 readln(b);

 if a=b then

   begin

   c:=a*a+b*b;

   writeln('Введённые числа равны, сумма их квадратов равна ',c,'.');

   end

 else

   begin

   c:=(a+b)*(a+b);

   writeln('Введённые числа не равны, квадрат их суммы равен ',c,'.');

   end

end.

Объяснение:

Если ввести равные ЦЕЛЫЕ числа, то программа выдаст сумму их квадратов, если ввести разные числа, то программа выдаст квадрат их суммы.

Большинство вирусов удалит или поместит в карантин антивирус (сторонний или встроенный Защитник Windows в Windows 10) ещё до того, как вирус начнет действовать.

Если антивирус на компьютере отсутствует, а вирус не так сильно влияет на систему, то можно скачать на официальном сайте и запустить глубокое сканирование.

Если антивирус невозможно установить или он не обнаруживает вирусы:

1) отключить интернет

2) проверить, не находится ли сторонняя программа в автозапуске (Пуск - Диспетчер задач - Автозагрузка) и отключить, если находится (или удалить в папке \%Documents and Settings%\%user name%\Start Menu\Programs\Startup\).

Если благодаря вирусу невозможно запустить ПК, то тут только переустановка ОС.