1.
const n=5;
var a: array [1..n] of integer;
i: integer;
begin
write(' исходный массив: ');
for i: =1 to n do
begin
a[i]: =random(21)-10;
write(a[i]: 3,' ');
if a[i] mod 2 = 0 then a[i]: =a[i]-3
end;
writeln;
write('преобразованный массив: ');
for i: =1 to n do write(a[i]: 3,' ')
end.
2.
const n=8;
var a: array [1..n] of integer;
i,s: integer;
begin
write('массив: ');
for i: =1 to n do
begin
a[i]: =random(21)-10;
write(a[i]: 3,' ');
s: =s + a[i]
end;
writeln;
write('сумма всех элементов массива: ',s)
end.
3.
const n=7;
var a: array [1..n] of integer;
i,p: integer;
begin
p: =1;
write('массив: ');
for i: =1 to n do
begin
a[i]: =random(21)-10;
write(a[i]: 3,' ');
if a[i] > 0 then p: =p * a[i]
end;
writeln;
write('произведение положительных элементов массива: ',p)
end.
примечание: библиотека locale.h используется для корректного изображения языка в консоли. библиотека stdlib.h необходима для использования функции "system(pause)", которая используется в конце программы. не позволяет консоли после выполнения основной программы закрыться.
я к тому, что фактически, используется только iostream
#include "iostream"
#include "stdlib.h"
#include "locale.h"
using namespace std;
int main(){
setlocale(lc_all, "russian");
int n, m;
cout < < "введите кол-во строк(n): "; cin > > n;
cout < < "введите кол-во столбцов(m): "; cin > > m;
int a[n][m];
for(int i = 0; i < n; i++){
for(int j = 0; j < m; j++){
cout < < "элемент [" < < i < < "]" < < "[" < < j < < "] = "; cin > > a[i][j];
}
}
cout < < "вывод массива" < < endl;
for(int i = 0; i < n; i++){
for(int j = 0; j < m; j++){
cout < < " " < < a[i][j] < < " ";
}
cout < < endl;
}
for(int i = 0; i < m; i++){
int min = a[0][i];
int max = a[0][i];
for(int j = 1; j < n; j++){
if(min > a[j][i]){
min = a[j][i];
}else if(max < a[j][i]) max = a[j][i];
}
cout < < "столбец " < < i+1 < < " содержит (min, max): " < < "(" < < min < < "," < < max < < ")";
cout < < endl;
}
system("pause");
return 0;
}
Поделитесь своими знаниями, ответьте на вопрос:
100 ! напишите 6 пунктов за, 6 пунктов против соц. сетей и сделайте вывод.
первое, о чем стоит упомянуть – активность на таких сайтах имеет множество отрицательных сторон. вот список ее недостатков:
1. социальные сети отвлекают от других видов деятельности;
2. некоторые люди выкладывают на свои страницы личные и семейные фотографии, а также телефонные номера – эти данные становятся общедоступными;
3. данные сайты увеличивают разрыв между людьми, имеющими доступ к компьютеру и теми, у которых его нет, обостряя социальное неравенство;
4. социальные сети могут вызвать изменения в государственной политике – или положительные, или отрицательные;
5. такие ресурсы могут быть использованы для дестабилизации правительства и продвижения терроризма, а также содействия организованной преступности;
6. социальные сети могут стать местом издевательств и унижения;
что хорошего в социальных сетях?
но общение на таких сайтах – это не сплошной поток недостатков. в каждом явлении из этого мира всегда найдется что-нибудь хорошее. вот и у социальных сетей есть свои преимущества:
1. они людям оставаться на связи;
2. социальные сети могут быть использованы для того, чтобы разрекламировать товары и услуги;
3. такие сайты могут стать доступной средой для самовыражения тем, у кого есть компьютер;
4. социальные сети способны семьям, разлученным войной, разводом и т.п., общаться между собой проще и быстрее, чем каким-либо другим способом;
5. эти сайты могут стать незаменимым при поиске работы;
6. такие сайты используют для решения проблем в присутствии других, чтобы они могли их рассмотреть и оценить. а люди, попавшие в беду, могут получить поддержку от своих друзей, находящихся далеко.
вывод: стремительное развитие техники к появлению – виртуального общения. данный вид общения становится все более и более популярным, человеку незачем выходить на улицу, чтобы дойти до магазина, нет необходимости ходить в гости, в театр в кино, все можно через интернет. стоит ли регистрироваться в соц.сетях и общаться с их – решать вам. главное, чтобы такие сайты сыграли в жизни лишь положительную роль.