<span>Идея PowerPoint появилась у Боба Гаскинса (Bob Gaskins), студента
университета Беркли, который решил, что наступает век графических
интерактивных материалов. В 1984 году Гаскинс присоединился к forethought и нанял разработчика Денниса Остина (Dennis Austin). Боб и Деннис
объединили усилия и создали программу Presenter. Деннис создал
оригинальную версию программы с Томом Рудкиным (Tom Rudkin). Позже, Боб
решил сменить имя на PowerPoint, которое и стало названием конечного
продукта.</span><span>В 1987 году вышел PowerPoint 1.0 для Apple Macintosh.
Он работал в чёрно-белом цвете. Вскоре появились цветные Macintosh и
новая версия PowerPoint не заставила себя ждать. Программное руководство
с первой редакции было уникально. Это была книга синего цвета в твердом
переплете. Компания Forethought считала, что это лучше, чем куча
исполняемых файлов помощи на компьютере и инструкций в электронном виде.
Но обновление инструкции было необоснованно дорого. Идея с подобными
книгами была вскоре заброшена.</span><span>Позже, в 1987, Forethought и её продукт были куплены Microsoft за 14 млн долларов. В 1990 году вышла версия для Windows. C 1990 года PowerPoint стал стандартом в наборе программ </span>microsoft office
<em>// PascalABC.NET 3.3, сборка 1599 от 17.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function sn(n:integer):integer; // сумма цифр числа
begin
n:=Abs(n);
Result:=0;
while n>0 do begin
Result+=n mod 10;
n:=n div 10
end
end;
begin
var (n,a,b):=ReadInteger3('Введите n,a,b через пробел:');
var m:=ArrRandom(n,a,b); m.Println;
var k:=ReadInteger('k=');
Writeln('Найдено чисел: ',m.Where(t->sn(t)=k).Count)
end.
<u>Пример</u>
Введите n,a,b через пробел: 15 -50 60
43 2 42 -26 -34 57 45 44 29 -41 -4 1 -17 38 -19
k= 7
Найдено чисел: 2
Лена Таня Маша
борщ - - +
пирожное + - -
салат - + -
Таня заказала салат. Чё тут решать то! двоечница!!!!!
1-крик
2-барабан
3-интернет
4-почта
5-телефон
6-костер
7-телевизор
8-радио
9-морзе
10-приемник
128 бит( в одном байте - 8 бит)