// PascalABC.NET 3.1, сборка 1218 от 12.04.2016 begin var m,n:integer; Write('Количество строк и столбцов матрицы: '); Read(n,m); var a:=MatrixRandom(n,m,10,99); for var i:=0 to n-1 do begin for var j:=0 to m-1 do Print(a[i,j]); Writeln end; var p:=ReadInteger('Введите число Р:'); var b:array of integer; SetLength(b,4*m); var k:=0; for var i:=n-p to n-1 do for var j:=0 to m-1 do if a[i,j] mod 4=0 then begin b[k]:=a[i,j]; Inc(k) end; SetLength(b,k); b.Print end.
#include <iostream> #include <cstdlib> #include <vector> using namespace std;
int main() { vector<int> v; cout <<"Укажите размер массива: "; int s; cin >>s; srand(time(0)); for(int i=0; i!=s; ++i) v.push_back(rand()%100); int find; cout <<"Введите число для поиска: "; cin >>find; bool founded = false; for(auto it=v.begin(); it!=v.end(); ++it) if(*it==find) founded=true; if(founded) cout <<"Это число есть в массиве!" <<endl; else cout <<"Такого числа нет в мвссиве!" <<endl;
Основные
Объяснение:
монитор - отображение видеоинформации
видеокарта - обработка и подача видеосигнала на монитор
клавиатура и мышь - ввод информации от пользователя
блок питания - распределение питания между внутренними устройствами
жёсткий диск - постоянная память компьютера
оперативная память - временная память компьютера
процессор - основные вычислительные операции
материнская плата - связыает все элементы между собой
куллер - охлаждает
системный блок - для крепления внутренних элементов
дополнительные устройства ввода: сд или двд приводы, сканер, тачпад на ноутах, сенсорные понели, вэбкамеры, микрофоны...
дополнительные устройства вывода: колонки или наушники + звуковая карта, принтеры, плоттеры, проэкторы..
Можно еще модем, но компьютер может работать и без него