Может нанисти много вреда например: Ти скачал с интернета какуето игру или приложение в любова сайта в етом самом сайте могут бить вируси например будет так: нажмите разришить что би пройти дальше.Если туда нажать то будет вискакивать реклами когда ти будеш заходить на браузер. Также когда ти скачиваеш то могут обмануть и вставить туда вируси.Щас интернет очень опасен.Найлудше скачивать програми из официальново сайта а на других могут обмани.
//Программа и скриншот ее работы в приложениях. //В условии неясность
const rows=7; cols=7; var i,j,s:byte; max,elm:shortint; prod:integer; T:array[1..rows, 1..cols] of shortint;
begin writeln('Заполнение массива случайными данными');
for i:=1 to rows do begin for j:=1 to cols do begin T[i,j]:=random(-15,15);// диапазон случайных чисел write(T[i,j]:6); end; writeln(); end;
prod:=1; for j:=1 to cols do //произведение эл-ов 3 строки prod:=prod*T[3,j]; writeln('Произведение элементов 3-ей строки: ', prod);
elm:=0; for j:=1 to cols do //если элемент 3 строки больше произведения эл-ов 3-ей строки if (T[3,j]>prod) then elm:=elm+1; writeln('Количество элементов 3-ей строки больших этого произведения: ', elm);
max:=0; for i:=1 to rows do if (max<T[i,3]) then max:=T[i,3]; writeln('Максимум в 3 столбце массива: ', max); end.
![Заполнить массив v(7,7) целыми случайными числами из интервала [-15,15]. распечатать его. - найти пр](/tpl/images/0857/2945/67d2c.jpg)
Может нанисти много вреда например: Ти скачал с интернета какуето игру или приложение в любова сайта в етом самом сайте могут бить вируси например будет так: нажмите разришить что би пройти дальше.Если туда нажать то будет вискакивать реклами когда ти будеш заходить на браузер. Также когда ти скачиваеш то могут обмануть и вставить туда вируси.Щас интернет очень опасен.Найлудше скачивать програми из официальново сайта а на других могут обмани.
Объяснение: