Сделайте доклад про ученого, который сделал большой вклад в развитие вычислительной техники 10-20 строк

Пол Аллен

Американский предприниматель, соучредитель Корпорации Майкрософт, которую он вместе со своим школьным приятелем Биллом Гейтсом основал в 1975 году.

В 1975 году впервые Аллен и Гейтс использовали название "Micro-Soft". В исходный код интерпретатора языка BASIC, созданного ими по заказу MITS.

В совместном бизнесе Пол Аллен занимался техническими идеями и перспективными разработками, Гейтсу ближе оказались переговоры, контракты и прочее деловое общение. И все же основные вопросы приятели решали вместе – порой, как признавался позже Гейтс, споры продолжались по 6-8 часов кряду. Для совместного детища Аллена и Гейтса звездный час наступил в 1980 году. Именно тогда IBM обратилась к не слишком-то крупной и еще не особо известной компании Microsoft с предложением адаптировать несколько языков программирования для их использования на персональном компьютере IBM PC, который должен был появиться на рынке в 1981 году. В ходе переговоров выяснилось, что представители IBM не прочь были бы найти и исполнителя, который подрядился бы разработать операционную систему для нового компьютера. Партнеры взялись за эту работу. Однако Аллен и Гейтс не разрабатывали новую операционную систему. Они знали, что Тим Патерсон, работавший в Seattle Compute Products, к этому времени уже разработал Q-DOS (Quick Disk Operating System – быстрая дисковая операционная система) для 16-разрядных процессоров Intel. Трюк заключался в том, что в ходе переговоров о приобретении Q-DOS ни в коем случае нельзя было дать понять продавцам, что у Аллена и Гейтса уже есть покупатель на эту систему. Гейтсу, как основному переговорщику, пришлось изрядно попотеть над этим, но комбинация блестяще удалась. Правда, систему пришлось подвергнуть переработке, ведь ей предстояло работать на 8-разрядных процессорах. Стремясь уложиться в срок, они работали едва ли не круглыми сутками и, по утверждению самого Аллена, был день, когда они вместе с Биллом, не отрываясь, просидели за компьютером 36 часов подряд. За PC-DOS, приобретение которой обошлось в несколько десятков тысяч долларов, IBM заплатил сразу же 6 тыс. долларов, при этом, по условиям подписанного сторонами договора, IBM взяла на себя обязательство продавать компьютеры только с PC-DOS, отчисляя при этом Microsoft проценты с каждой проданной единицы техники.

1) Если изначальный массив НЕ дан, т.е необходимо его заполнить случайными числами

#include <iostream>

#include <cstdlib>

#include <ctime>

using namespace std;

void GetMaxAndMinIndex(int* data,int* MaxIndex,int* MinIndex) {

for (int i = 0; i < 200; ++i) {

 if (data[i] > data[i + 1]) {

  *MaxIndex = i;

 }

 if (data[i] < data[i + 1]) {

  *MinIndex = i;

 }

}

}

void SearchSrAr(int* data,int* MaxIndex,int* MinIndex) {

int tmpI = 0;

int TmpNum = 0;

for (int i = *MinIndex; i < *MaxIndex; ++i) {

 TmpNum = TmpNum + data[i];

 tmpI++;

}

double output = TmpNum / tmpI;

cout <<"Ваше число "<< output;

}

int main() {

setlocale(LC_ALL, "Russian");

int* data = new int[200];

int MaxIndex = 0, MinIndex = 100;

srand(time(NULL));

for (int i = 0; i < 200;++i) {

 data[i] = rand() % 100;

}

GetMaxAndMinIndex(data, &MaxIndex, &MinIndex);

SearchSrAr(data, &MaxIndex, &MinIndex);

delete[] data;

}

И если этот массив и его размер нам известны

#include <iostream>

#include <cstdlib>

#include <ctime>

using namespace std;

void GetMaxAndMinIndex(int* data,int* MaxIndex,int * n,int* MinIndex) {

for (int i = 0; i < *n; ++i) {

 if (data[i] > data[i + 1]) {

  *MaxIndex = i;

 }

 if (data[i] < data[i + 1]) {

  *MinIndex = i;

 }

}

}

void SearchSrAr(int* data,int* MaxIndex,int* MinIndex) {

int tmpI = 0;

int TmpNum = 0;

for (int i = *MinIndex; i < *MaxIndex; ++i) {

 TmpNum = TmpNum + data[i];

 tmpI++;

}

double output = TmpNum / tmpI;

cout <<"Ваше число "<< output;

}

int main() {

setlocale(LC_ALL, "Russian");

int n;

cout << "Введите количество чисел в массиве " << endl;

cin >> n;

int* data = new int[n];

int MaxIndex = 0, MinIndex = 100;

cout << "Введите ваш массив " << endl;

for (int i = 0; i < n; ++i) {

 cin >> data[i];

}

GetMaxAndMinIndex(data, &MaxIndex,&n, &MinIndex);

SearchSrAr(data, &MaxIndex, &MinIndex);

delete[] data;

}

Объяснение:

Код на с++

const

 N = 10;

var

 B: array[1..N+1] of integer;

 Sum, i, first_even_i: integer;

Begin

 WriteLn('Введите массив: ');

 For i := 1 to N do

   Read(B[i]);

 

 For i := 1 to N-1 do

   if (B[i+1] mod 2 <> 0) then

     B[i] := 0;

 

 For i := 1 to N do

   if (B[i] mod 2 = 0) then

   begin

     first_even_i := i;

     break;

   end;

 

 For i := N+1 downto first_even_i + 1 do

   B[i] := B[i-1];

 

 B[first_even_i] := 0;

 

 WriteLn('Среднее арифметическое всех элементов: ', Sum / (N + 1));

 WriteLn('Получившийся массив: ', B);

End.