Яустановила картинку с гарри поттером себе на компьютер, но функцию с "установить " найти не могу, а хочу поставить ее себе на рабочий стол. как мне ее установить? 15 за нормальное решение.
Для мене зручна клавіатура це рівно розприділені функціональні клавіші на обидві сторони клавіатури для швидшої роботи з ПК. Розкладку клавіатури я вважаю залишити такою ж, бо вже звик до такої і вона мені найбільш зручна. Хотілось би, щоб розміщення клавіш було рельєфним для зручнішого і швидшого друку тексту. Мала ложе під зап'ястя щоб руки менш втомлювались. І мала сантиметровий підйом над столом, щоб у випадку потрапляння рідини на стіл не була пошкоджена. Дуже зручно було б мати USB порт для зручної роботи з флешками і мала додаткові регулюючі софт клавіші при натисканні яких вмикалась вибрана програма. Ось це була б найзручніша клавіатура для мене.
Сначала надо найти аналитическое решение задачи. Определить координаты точек пересечения двух функций - это совместно решить уравнения, описывающего функции. Теперь можно составить программу, предусмотрев в ней анализ случаев D<0, D=0 и D>0.
uses Crt; var k,b,c,x1,x2,y1,y2,d:real; begin ClrScr; Write('Введите через пробел c,k,b: '); Read(c,k,b); d:=sqr(k)-4*(c-b); if d<0 then Writeln('Точек пересечения нет') else if d=0 then begin x1:=k/2; y1:=k*x1+b; Writeln('Координаты точки пересечения (',x1:0:4,',',y1:0:4,')') end else begin d:=sqrt(d); x1:=(k-d)/2; y1:=k*x1+b; x2:=(k+d)/2; y2:=k*x2+b; Writeln('Координаты точек пересечения:'); Writeln('(',x1:0:4,',',y1:0:4,'), (',x2:0:4,',',y2:0:4,')') end; ReadKey end.
