“Множества” питон 1. Подсчитайте количество уникальных символов в высказывании Уильяма Шекспира: “All the world’s a stage, and all the men and women merely players. They have their exits and their entrances; and one man in his time plays many parts.” (одна и та же буква в разных регистрах считается как один символ). Согласно таблице ASCII какой из символов данного высказывания является минимальным, а какой максимальным?

2. Дано два множества {1, 2, 3, 4, 5} и {4, 5, 6, 7, 8}. Найти:
a. объединение множеств
b. пересечение множеств
c. симметричную разность множеств
d. элементы из второго множества, входящие в первое, и удалить их из первого
e. является ли второе множество супермножеством для {5, 7, 4} и {8, 4, 3}
f. является ли второе множество правильным супермножеством для {5, 8, 4, 7, 6}

3. Среди учеников старших классов провели олимпиады по физике и математике. Результаты выглядят следующим образом: на олимпиаде по математике 1 место занял Матвей, 2 место - Евгения, 3 место - Михаил, 4 место - Максим и 5 место - Наталья, а в олимпиаде по физике призовая тройка выглядит следующим образом: 1 место - Максим, 2 место - Матвей и 3 место - Александр. Администрацией школы было решено наградить всех победителей, а также особый приз выдать ребятам, занявшим призовые места по двум дисциплинам сразу.
Создайте общий список победителей двух олимпиад. Список призеров в олимпиаде по математике отредактируйте и удалите из него тех ребят, которые не вошли в тройку призеров в олимпиаде по физике, после чего удалите список призеров по физике.

Основа взята на сайте progmatem.ru. К сожалению, автор статьи там не был указан.

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
uses graphABC;
const
  w=1000;
  h=600;

function f(x:real):=0.5*x*cos(2*x);

begin
  SetWindowSize(w,h);
  // поле для графика в окне
  var xLeft:=50;
  var yLeft:=50;
  var xRight:=w-xLeft;
  var yRight:=h-yLeft;
  // интервалы по осям
  var ax:=-12.0;
  var bx:=12.0;
  var hx:=1.0;
  var ay:=-6.5; // минимум f(x) с запасом
  var by:=6.5;
  var hy:=0.5;
  // масштабы по осям
  var mx:=(xRight-xLeft)/(bx-ax);
  var my:=(yRight-yLeft)/(by-ay);
  // точка начала координат графика
  var x0:=xLeft+Trunc(abs(ax)*mx);
  var y0:=yRight-Trunc(abs(ay)*my);
  // рисование координатных осей
  Line(xLeft,y0,xRight+10,y0);
  Line(x0,yLeft-10,x0,yRight);
  SetFontSize(12); SetFontColor(clBlue);
  TextOut(xRight+15,y0-10,'X');
  TextOut(x0-4,yLeft-30,'Y');
  SetFontSize(8); SetFontColor(clGreen);
  // рисование засечек
  var s:string;
  for var i:=1 to Round((bx-ax)/hx)+1 do begin
    var num:=ax+(i-1)*hx;
    var x:=xLeft+Trunc(mx*(num-ax));
    Line(x,y0-3,x,y0+3);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x-TextWidth(s) div 2,y0+10,s)
    end;
  for var i:=1 to Round((by-ay)/hy)+1 do begin
    var num:=ay+(i-1)*hy;
    var y:=yRight-Trunc(my*(num-ay));
    Line(x0-3,y,x0+3,y);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x0+7,y-TextHeight(s) div 2,s)
    end;
    TextOut(x0-10,y0+10,'0');
  // собственно график
  var xi:=ax;
  while xi<=bx do begin
    var yi:=f(xi);
    var x:=x0+Round(xi*mx);
    var y:=y0-Round(yi*my);
    if (y>=yLeft) and (y<=yRight) then SetPixel(x,y,clRed);
    xi+=1e-3
    end
end.

*******************************************
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
uses graphABC;
const
  w=1000;
  h=600;

function f(x:real):=8*sin(x)*sin(2*x);

begin
  SetWindowSize(w,h);
  // поле для графика в окне
  var xLeft:=50;
  var yLeft:=50;
  var xRight:=w-xLeft;
  var yRight:=h-yLeft;
  // интервалы по осям
  var ax:=-15.0;
  var bx:=15.0;
  var hx:=1.0;
  var ay:=-6.5; // минимум f(x) с запасом
  var by:=6.5;
  var hy:=0.5;
  // масштабы по осям
  var mx:=(xRight-xLeft)/(bx-ax);
  var my:=(yRight-yLeft)/(by-ay);
  // точка начала координат графика
  var x0:=xLeft+Trunc(abs(ax)*mx);
  var y0:=yRight-Trunc(abs(ay)*my);
  // рисование координатных осей
  Line(xLeft,y0,xRight+10,y0);
  Line(x0,yLeft-10,x0,yRight);
  SetFontSize(12); SetFontColor(clBlue);
  TextOut(xRight+15,y0-10,'X');
  TextOut(x0-4,yLeft-30,'Y');
  SetFontSize(8); SetFontColor(clGreen);
  // рисование засечек
  var s:string;
  for var i:=1 to Round((bx-ax)/hx)+1 do begin
    var num:=ax+(i-1)*hx;
    var x:=xLeft+Trunc(mx*(num-ax));
    Line(x,y0-3,x,y0+3);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x-TextWidth(s) div 2,y0+10,s)
    end;
  for var i:=1 to Round((by-ay)/hy)+1 do begin
    var num:=ay+(i-1)*hy;
    var y:=yRight-Trunc(my*(num-ay));
    Line(x0-3,y,x0+3,y);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x0+7,y-TextHeight(s) div 2,s)
    end;
    TextOut(x0-10,y0+10,'0');
  // собственно график
  var xi:=ax;
  while xi<=bx do begin
    var yi:=f(xi);
    var x:=x0+Round(xi*mx);
    var y:=y0-Round(yi*my);
    if (y>=yLeft) and (y<=yRight) then SetPixel(x,y,clRed);
    xi+=1e-3
    end
end.

«История развития вычислительной техники»

Выполнила: учащаяся группы О2-2

Рогова Анна

г. Гомель, 2003

Содержание

Введение. 2

История технологий и поколений ЭВМ... 3

Механические предпосылки . 3

Электромеханические вычислительные машины .. 4

Электронные лампы .. 4

ЭВМ 1-ого поколения. Эниак ( ENIAC) 5

Транзисторы. ЭВМ 2-го поколения. 7

Интегральные схемы. ЭВМ 3-го поколения . 8

Сверхбольшие интегральные схемы (СБИС). ЭВМ 4-го поколения . 8

История развития персональных ЭВМ (PC – Personal Computer) 10

Роль вычислительной техники в жизни человека. 16

Заключение. 19

Список литературы.. 20

Введение

Слово «компьютер» означает «вычислитель», т.е. устройство для вычислений. Потребность в автоматизации обработки данных, в том числе вычислений, возникла очень давно. Более 1500 лет тому назад для счета использовались счетные палочки, камешки и т.д.

В наше время трудно представить себе, что без компьютеров можно обойтись. А ведь не так давно, до начала 70-х годов вычислительные машины были доступны весьма ограниченному кругу специалистов, а их применение, как правило, оставалось окутанным завесой секретности и мало известным широкой публике. Однако в 1971 году произошло событие, которое в корне изменило ситуацию и с фантастической скоростью превратило компьютер в повседневный рабочий инструмент десятков миллионов людей. В том, вне всякого сомнения знаменательном году еще почти никому не известная фирма Intel из небольшого американского городка с красивым названием Санта-Клара (шт. Калифорния), выпустила первый микропроцессор. Именно ему мы обязаны появлением нового класса вычислительных систем – персональных компьютеров, которыми теперь пользуются, по существу, все, от учащихся начальных классов и бухгалтеров до ученых и инженеров.

В конце XX века невозможно представить себе жизнь без персонального компьютера. Компьютер прочно вошел в нашу жизнь, став главным человека. На сегодняшний день в мире существует множество компьютеров различных фирм, различных групп сложности, назначения и поколений.

В данном реферате мы рассмотрим историю развития вычислительной техники, а также краткий обзор о возможностях применения современных вычислительных систем и дальнейшие тенденции развития персональных компьютеров.

История технологий и поколений ЭВМ

Механические предпосылки

Начало развития технологий принято считать с Блеза Паскаля, который в 1642г. изобрел устройство, механически выполняющее сложение чисел. Его машина предназначалась для работы с 6-8 разрядными числами и могла только складывать и вычитать, а также имела лучший, чем все до этого фиксации результата. Машина Паскаля имела размеры 36´13´8 сантиметров, этот небольшой латунный ящичек было удобно носить с собой. Инженерные идеи Паскаля оказали огромное влияние на многие другие изобретения в области вычислительной техники.

Следующего этапного результата добился выдающийся немецкий математик и философ Готфрид Вильгельм Лейбниц, высказавший в 1672 году идею механического умножения без последовательного сложения. Уже через год он представил машину, которая позволяла механически выполнять четыре арифметических действия, в Парижскую академию. Машина Лейбница требовала для установки специального стола, так как имела внушительные размеры: 100´30´20 сантиметров.

В 1812 году английский математик Чарльз Бэббидж начал работать над так называемой разностной машиной, которая должна была вычислять любые функции, в том числе и тригонометрические, а также составлять таблицы. Свою первую разностную машину Бэббидж построил в 1822 году и рассчитывал на ней таблицу квадратов, таблицу значений функции y=x2 +x+41 и ряд других таблиц. Однако из-за нехватки средств эта машина не была закончена, и сдана в музей Королевского колледжа в Лондоне, где хранится и по сей день. Однако эта неудача не остановила Бэббиджа, и в 1834 году он приступил к новому проекту – созданию Аналитической машины, которая должна была выполнять вычисления без участия человека. С 1842 по 1848 год Бэббидж упорно работал, расходуя собственные средства. К сожалению, он не смог довести до конца работу по созданию Аналитической машины – она оказалась слишком сложной для техники того времени. Но заслуга Бэббиджа в том, что он впервые предложил и частично реализовал, идею программно-управляемых вычислений. Именно Аналитическая машина по своей сути явилась прототипом современного компьютера. Эта идея и ее инженерная детализация опередили время на 100 лет!

Уроженец Эльзаса Карл Томас, основатель и директор двух парижских страховых обществ в 1818 году сконструировал счетную машину, уделив основное внимание технологичности механизма, и назвал ее арифмометром. Уже через три года в мастерских Томаса было изготовлено 16 арифмометров, а затем и еще больше. Таким образом, Томас положил начало счетному машиностроению. Его арифмометры выпускали в течение ста лет, постоянно совершенствуя и меняя время от времени названия.