Есть ответ 👍

Компьютер туралы ақпарат ол нені сақтай алады

179
496
Посмотреть ответы 2

Ответы на вопрос:


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


Ну функция randomize() создаёт, перемешивает новые рандомные числа, а random() их предоставляет. разных вариаций написания много, я например сделал с массивом, можно в принципе и без него, но с ним лучше т.к. числа хранятся в массиве и их можно выводить в будущем, если это слишком сложно для тебя, то я могу написать программу без использования массива. var i, b: integer;     a: array[1..20] of integer; begin   randomize();   for i: =1 to 20 do   a[i]: =random(0,50); write('из чисел: ');     for i: =1 to 20 do     begin     if i=20 then       writeln(a[i])         else write(a[i],', ')     end; write('кол-во четных равняется: ');   for i: =1 to 20 do               if (a[i] mod 2 = 0) then b: =b+1; writeln(b) end . вот выводы программы, которые у меня получились. первый раз: из чисел: 42, 1, 46, 24, 36, 9, 22, 16, 7, 41, 49, 46, 27, 29, 50, 44, 44, 10, 48, 36 кол-во четных равняется: 13 второй раз: из чисел: 5, 16, 16, 27, 1, 48, 46, 45, 46, 13, 21, 18, 24, 45, 14, 13, 33, 14, 21, 30 кол-во четных равняется: 10 третий раз: из чисел: 15, 2, 24, 42, 49, 43, 5, 48, 8, 1, 45, 9, 20, 24, 35, 19, 11, 15, 26, 33 кол-во четных равняется: 8 файл с кодом прикреплю во вложения, спрашивай если не понятна какая-то функция, объясню, дабы ты не стоял в ступоре перед

Популярно: Информатика