Var y: array[1..10]of real; g: array of real; i,j,n: integer; begin for i: =1 to 10 do begin y[i]: =ln((random(500)+1)/10)-3; if y[i]< 0 then n: =n+1; write(y[i],' '); end; writeln; writeln('количество отрицательных: ',n); writeln('измененный массив: '); setlength(g,n); for i: =1 to 10 do begin if y[i]< 0 then begin g[j]: =y[i]; y[i]: =-y[i]; j: =j+1 end; write(y[i],' ') end; writeln; writeln('массив g: '); for i: =0 to n-1 do write(g[i],' ') end.
Карен
22.04.2023
Сайт нужен прежде всего для получения информации! мы можем зайдя на определенный сайт, узнать информацию о человеке, те же социальные сети. можем купить что-нибудь в интернет магазине. также через сайт мы можем найти себе работу, и мы можем получить дополнительную информацию о фирме, на которую хотим устроиться. зайдя на сайт компании, можем узнать о них по больше. есть большое количевство музыкальных порталов, где вы сможете скачать понравившуюся песню. есть сайты, где вы сможете посмотреть фильмы, сериалы, мультфильмы, мульсериалы (например fs.to) тем самым, сможете посмотреть фильм на разных языках ( перевод, (оригинал), украинский, также много любительских переводов). школьный сайт - такие как znanija или yaklass, нам в школьной учебе. мы получаем информацию, которую хотим получить. это имеет не мало важную роль. например я не навижу читать эти пораграфы, которые и так скучны. на yaklass есть много тем, в которых описуются самые основное. нежели читать пол пораграфа, не поняв зачем мне это, когда главного вних не так уж много. также мы можем тренировать свои знания, выполняв на znanija и yaklass, это не мало важно, так как вы сможете проверить усвоенные знания.