1. дан массив а из 10 элементов, которые заполняются случайным образом, числам от 0 100. выведите массив на экран и найдите максимальный элемент массива. 2. создать массив a из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0; 20 вывести полученный массив на экран. вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.

1) constn=10; var i: byte; max: real; a: array[1..n] of real; begin for i: =1 to n do a[i]: =random(100); for i: =1 to n do write(a[i]: 3); for i: =1 to n do   max: =a[i]; if max< a[i] then max: =a[i]; writeln('максимальный элемент = ',max); end.

1.const   n=10; type vector = array [1..n] of integer; var b: vector;           max : integer; procedure intvector(n: integer; var a: vector); begin    for var i : = 1 to n do    a[i] : = random(100); end; procedure outvector(n: integer; a: vector); begin  for var i : = 1 to n do    begin      write(a[i]: 5); end; end; procedure srav (a: vector; n,g: integer); begin g : = a[1]; for var i: =1 to n do if (g < a[i]) then g: =a[i]; writeln (g); end; begin  intvector(n, b);   writeln;   outvector(n, b );   writeln;     srav(b,n, max);   writeln; end.2.  const  n = 10; type  vector = array [1..n] of integer; var  b: vector;         r,v : real;   procedure intvector(n: integer; var a: vector); begin  for var i : = 1 to n do      a[i] : = random(20); end; procedure outvector(n: integer; a: vector); begin    for var i : = 1 to n do    begin    write(a[i]: 5);     end; end; function srednee(a: vector; n: integer): real; begin  for var i : = 1 to n do    begin    result : = (result + a[i]);     end;   end; function kolvo(a: vector; g: real): real; begin  for var i : = 1 to n do     if (a[i] < (srednee(a, n)/10)) then result : = result + 1; end; begin  intvector(n, b);   writeln;   outvector(n, b );   writeln;   writeln ((srednee(b, n)/10): 5: 3);     r : = kolvo(b, v);   writeln(r); end.

#define N 10

#include <iostream>

using namespace std;

int main() {

setlocale(LC_ALL, "Rus");

int mas[N];

cout << "Исходный массив: ";

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

 cin >> mas[i];

}

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

 for (int j = 0; j < N-1; j++) {

  if (mas[j] > mas[j + 1]){

   int d = mas[j];

   mas[j] = mas[j + 1];

   mas[j + 1] = d;

  }

 }

}

cout << "\nОтсортированный массив: ";

for (int i = 0; i < N; i++)

 cout << mas[i] << " ";

return 0;

}

ответ:«Компьютер» сөзі ағылшын тілінен аударғанда есептеуіш , есептеуге арналған құрылғы дегенді білдіреді. Компьютерлер есептеу операцияларының қатарларын адамның қатысуынсыз, алдын ала көрсетілген нұсқаулық – бағдарлама бойынша жүргізуге мүмкіндік береді. Есептеуіш техниканың қазіргі тарихының негізі 1943 жылы «Марк-1» машинасының дүниеге келуінен бастап қаланды. Компьютерлердің алдыңғы буындары шамдық есептеуіш машиналар болатын, олардың орнын транзисторлы электронды есептеуіш машиналар (ЭЕМ), содан кейін – интегралды сызбалар пайдаланылатын электронды есептеуіш машиналар және ең ақырында, қазіргі таңда аса үлкен интеграциялық деңгейлі сызбалар пайдаланылатын ЭЕМ басты.

Негізгі принциптері: Өзінің алдына қойылған тапсырманы орындау үшін компьютер механикалық бөліктердің орын ауыстырылуын, электрондардың, фотондардың, кванттық бөлшектердің ағынын немесе басқа да жақсы зерттелген физикалық құбылыс әсерлерін қолданады. Көбімізге компьютерлердің ең көп таралған түрі — дербес компьютер жақсы таныс.

Компьютер архитектурасы алға қойылған мәселені, зерттеліп отырған физикалық құбылысты максималды айқын көрсетіп, модельдеуге мүмкіндік береді. Мысалы, электрондық ағындар бөгеттер салу кезіндегі су ағынының үлгісі ретінде қолданылуы мүмкін. Осылай құрастырылған аналогтық компьютерлер XX ғасырдың 60-жылдары көп болғанымен, қазір сирек кездеседі.

Қазіргі заманғы компьютерлердің басым бөлігінде алға қойылған мәселе әуелі математикалық терминдерде сипатталады, бұл кезде барлық қажетті ақпарат екілік жүйеде (бір және ноль ретінде) көрсетіледі, содан кейін оны өңдеу үшін қарапайым логика алгебрасы қолданылады. Іс жүзінде барлық математикалық есептерді бульдік операциялар жиынына айналдыруға болатындықтан, жылдам жұмыс жасайтын электронды компьютерді математикалық есептердің, сонымен қатар, ақпаратты басқару есептерінің көпшілігін шешу үшін қолдануға болады.

Бірақ, компьютерлер кез келген математикалық есепті шеше алмайды. Компьютер шеше алмайтын есептерді ағылшын математигі Алан Тьюринг сипаттаған болатын.

Орындалған есеп нәтижесі пайдаланушыға әр түрлі енгізу-шығару құрылғыларының көмегімен көрсетіледі, мысалы, лампалық индикаторлар, мониторлар, принтерлер және т.б.

Компьютер — жай ғана машина, ол өзі көрсетіп тұрған сөздерді «түсінбейді» және өз бетінше «ойламайды». Компьютер тек қана бағдарламада көрсетілген сызықтар мен түстерді енгізу-шығару құрылғыларының көмегімен механикалық түрде көрсетеді. Адам миы экрандағы көріністі қабылдап, оған белгілі бір мән береді.

Объяснение: