int main() { setlocale(LC_ALL, "Russian"); int N, y, i; bool Prime; cout << "Введите число: "; cin >> N; do { Prime = true; y = N % 10; for (i = 2; i <= (sqrt(abs(y))); i++) { if (y % i == 0) { Prime = false; break; } } if ((Prime) & (y != 0) & (y != 1)) cout << y << " - простое" << endl; else cout << y << " - не простое" << endl; N = N / 10; } while (N != 0); system("pause"); return 0; }
var c, a: array[1..20] of integer; i: integer; begin write('Первый массив '); for i := 1 to 20 do begin c[i] := i * (-5); write(c[i], ' '); end; writeln; write('Преобразованный массив '); for i := 1 to 20 do begin a[i] := c[20 - i + 1]; write(a[i], ' '); end; end.
ИЛИ Программа не использующая два массива, а просто переворачивающая первый
var c: array[1..20] of integer; i: integer; begin write('Первый массив '); for i := 1 to 20 do begin c[i] := i * (-5); write(c[i], ' '); end; writeln; write('Преобразованный массив '); for i := 20 downto 1 do write(c[i], ' '); end.