чтобы не задавать вручную, пусть он заполняется случайными числами в диапазоне от -50 до + 50
Free Pascal
const
n=10;
m=8;
var
x : array [0..n] of integer;
y : array [0..m] of integer;
z : array [0..n+m] of integer;
i, c, mi : integer;
begin
randomize;
writeln('Массив X');
for i:=0 to n-1 do begin
x[i] := random(100)-50;
if i<m then
y[i] := random(100)-50;
write(x[i], ' ');
end;
c:=0;
mi:=0;
for i:=0 to n-1 do begin
if x[i] mod 2 = 0 then c:=c+x[i];
if (x[i] < 0) and (x[i] < mi) then mi:=x[i];
end;
writeln();
writeln('Сумма чётных = ', c);
if mi<0 then
writeln('Наименьшее из отрицательных = ', mi)
else
writeln('Отрицательных элементов не найдено');
(*Задание 2 - объединить массивы a и b*)
writeln('Массив Y');
for i:=0 to n-1 do z[i]:=x[i];
for i:=0 to m-1 do begin
z[i+n]:=y[i];
write(y[i], ' ');
end;
writeln();
writeln('Массив Z');
for i:=0 to n+m-1 do
write(z[i], ' ');
end.
Баннер (англ. banner — флаг, транспарант) — графическое изображение рекламного характера.
Интерстициальная реклама (Interstitial Ads) — полноэкранная реклама, закрывающая собой интерфейс приложения или веб-браузера.
Та́ргетинг (англ. target — цель) — рекламный механизм, позволяющий выделить из всей имеющейся аудитории только ту часть, которая удовлетворяет заданным критериям (целевую аудиторию), и показать рекламу именно ей.
IP-телефония или интернет-телефония – это связь с передачей голосовой информации в цифровом виде по сети Интернет.
MUD (Multi User Dungeon, Dimension или Domain, русский вариант — МПМ (многопользовательский мир), также используются аббревиатуры МУД и МАД) — текстовая многопользовательская компьютерная игра, в которой присутствуют элементы ролевой игры с тактикой "руби и режь" и взаимодействием...
