Для мене зручна клавіатура це рівно розприділені функціональні клавіші на обидві сторони клавіатури для швидшої роботи з ПК. Розкладку клавіатури я вважаю залишити такою ж, бо вже звик до такої і вона мені найбільш зручна. Хотілось би, щоб розміщення клавіш було рельєфним для зручнішого і швидшого друку тексту. Мала ложе під зап'ястя щоб руки менш втомлювались. І мала сантиметровий підйом над столом, щоб у випадку потрапляння рідини на стіл не була пошкоджена. Дуже зручно було б мати 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.
