#include <iostream>
<span>#include <cstdlib>
</span><span>#include <iomanip>
</span><span>using namespace std;
</span>int const n=6;
<span>int const m=6;
</span>int main() {
<span> int a[n][m];
</span><span> int sm;
</span><span>// установка генератора случайных чисел
</span><span> srand(time(NULL));
</span><span>// генерация массива и вывод на экран
</span><span> for (int i=0; i<n; i++) {
</span> <span>for (int j=0; j<m; j++) {
</span> <span>a[i][j]=rand()%50-20;
</span><span> cout<<setw(7)<<a[i][j];
</span><span> }
</span><span> cout<<endl;
</span><span> }
</span><span>// обработка массива
</span><span> for (int i=0; i<m; i++) {
</span><span> sm=0;
</span><span> for (int j=0; j<n; j++) sm+=a[j][i];
</span><span> for (int j=0; j<n; j++)
</span><span> if (2*a[j][i]>sm) cout<<j+1<<" "<<i+1<<endl;
</span><span> }
</span><span> system("pause");
</span><span> return 0;
}</span>
-16 -2 15 4 7 3
<span> -13 16 3 16 -13 3
</span><span> 0 19 20 6 20 -18
</span><span> -19 7 1 10 -11 25
</span><span> 5 4 3 21 28 -13
</span><span> 26 -19 -7 12 -20 11
</span><span>1 1
</span><span>2 1
</span><span>3 1
</span><span>5 1
</span><span>6 1
</span><span>3 5
</span><span>5 5
</span><span>4 6
</span>
Pascal ABC...................
а)<em>8</em>"<u>бит</u>"
б)<em>0.026001</em>"<u>Кбайт</u>"
в)<em>1024</em>"<u>Кбайт</u>"-<em>1048576</em>"<u>байт</u>"-<em>8388608</em>"<u>бит</u>"
г)<em>1.5</em>"<u>Кбайт</u>"-<em>1536</em>"<u>бит</u>"
1)
var s: string; i: byte;
begin
writeln('Введите строку:');
readln(s);
i:=1;
while i<=length(s) do begin
delete(s,i,1);
insert('a',s,i);
i:=i+2;
end;
writeln(s);
end.
---------------------------------------------
Введите строку:
Меняем нечетные символы на а
aеaяaмaнaчaтaыa aиaвaлa aаaа
---------------------------------------------
2) это задание решено в другом Вашем вопросе
znanija.com/task/22037051
Ответ:
2
Объяснение:
Алгоритм находит количество равных первых букв у обоих слов.
в нашем случае у обоих слов равны только первые две буквы: С, Т