9 декабря 1968 года компьютерная мышь была представлена на показе интерактивных устройств в Калифорнии. Патент на этот гаджет получил Дуглас Энгельбарт в 1970 году.
Первым компьютером, в набор которого включалась мышь, был миникомпьютер Xerox 8010 Star Information System, представленный в 1981 году. Мышь фирмы Xerox имела три кнопки и стоила 400 долларов США, что соответствует почти 1000 долларов в ценах 2012 года с учётом инфляции. В 1983 году фирма Apple выпустила свою собственную однокнопочную мышь для компьютера Lisa, стоимость которой удалось уменьшить до $25. Широкую известность мышь приобрела благодаря использованию в компьютерах Apple Macintosh и позднее в ОС Windows для IBM PC совместимых компьютеров. В СССР выпускалась компьютерная мышь, называвшаяся "Манипулятор "Колобок" с тяжёлым металлическим, не покрывавшимся тогда резиной, шаром.
Progran Znanija;
var x, y:integer;
begin
readln(x);
if x<10 then
y:=2*x+x-5;
else
begin
if x<13 then
y:=5*x*x-x;
else
y:=7*x-5;
end
writeln(y);
end.
счётчик цикла должен быть целым, т. е. integer!!
Var a,b:real;
Begin
Write('Введите два числа: ');
ReadLn(a,b);
if a > b then WriteLn(a*3)
else WriteLn(b*3);
Write('Введите три числа: ');
Read(a,b);
if a > b then a:=b;
ReadLn(b);
if a > b then a:=b;
WriteLn(a-10);
End.
Пример работы программы:
Введите два числа: 1 3
9
Введите три числа: 2 1 3
-9
