var a: array[1..m, 1..n] of integer; i, j, t: integer; p: longint;
begin Randomize; Writeln('Исходный массив'); p := 1; for i := 1 to m do begin for j := 1 to n do begin a[i, j] := Random(19) - 9; Write(a[i, j]:3); if (abs(a[i, j]) < 1) or (abs(a[i, j]) > 5) then p := p * a[i, j] end; Writeln end; Writeln('Произведение элементов с модулем вне [1;5] равно ', p) end.
Тестовое решение: Исходный массив -8 2 7 -3 -8 5 1 -4 -3 6 9 6 Произведение элементов с модулем вне [1;5] равно 145152
#define IN 1 //внутри слова #define OUT 0 //вне слова
int main() { string s; getline(cin, s); int state = OUT; //позиция s = ' ' + s + ' '; int k = 0; //позиция начала слова for (int i = 0; i < s.size(); i++) if (s[i] == ' ') { if (state == IN && s[k] == s[i - 1]) cout << s.substr(k, i - k + 1) << endl; state = OUT; } else if (state == OUT) { k = i; state = IN; } return 0; }
Любое число без плавающей точки.
1,2,3,4,5-подходят.
0,5;1,7;10,52 - не подходят.