Дано число.определить является ли оно простым. программа на паскале. напишите через while или repeat.заранее - id452064820210722 от Mirskaya 22.07.2021 06:52

Question

Информатика: Дано число.определить является ли оно простым. программа на паскале. напишите через while или repeat.заранее )

Mirskaya · Accepted Answer

#include iostream #include cstdlib #include ctime #define abs(x) ((x) 0 ? -(x) : (x)) using namespace std; int main() {     srand(time(0));     int n, k, m = 0;     cout n = , cin n;          int A[n], B[n];     cout A( n ): ;     for(int i = 0; i n; i++)         cout (A[i] = rand() % (n*2+1) -n);          cout 
k = , cin k;          for(int i = 0; i n; i++)         if (abs(A[i]) % 10 == k) B[m++] = A[i];          cout B( m ): ;     for(int i = 0; i m; i++)         cout B[i];     return 0; }...

Дано число.определить является ли оно простым. программа на паскале. напишите через while или repeat.заранее )

MOGZ ответил