Даны два произвольные одномерные массивы целых чисел м1 и м2 с одинаковым количеством элементов. сформировать массив м3, элементами которого являются числа, образующиеся по формуле m3 [i] = m1 [i] + m2 [i].(си )
Var m1,m2,m3:array of integer; i,n:integer; begin write('Введите размер массивов'); readln(n); setlength(m1,n); setlength(m2,n); setlength(m3,n); //Заполнение массивов for i:=0 to n-1 do begin m1[i]:=random(21)-10; m2[i]:=random(21)-10; m3[i]:= m1[i]+m2[i]; end; //Вывод массивов for i:=0 to n-1 do write(m1[i]:4); writeln; for i:=0 to n-1 do write(m2[i]:4); writeln; for i:=0 to n-1 do write(m3[i]:4); writeln; end.
Информация - это сведения, об окружающем нас мире. Алгоритм - это конечная последовательность шагов при решении задач, приводящая от исходных данных к конечному результату Модель - это объект, дающий упрощенное представление о реальном объекте, процессе или явлении, который отражает существенные стороны изучаемого объекта с точки зрения цели моделирования. Система - специальная программа Команда - это действие для выполнения задачи компьютером Приложение - последовательность инструкций, предназначенных для исполнения устройством управления вычислительной машины
A - Аня, b - Боря, v - Вася, g - Галя, d - Даша, i - Иван. a>b, v>g, d<i, v<a, d>b; Мы знаем, что а>b, значит ,что b<v; Мы знаем, что d>b, значит ,что b<i; Мы знаем, что v>g и v<a, значит ,что b<v; Следовательно мы нашли обладателя меньшей флешки. Им стал Боря. Раз b самый меньший, то в дальнейших расчетах его можно не использовать. Мы знаем, что a>v, а это значит ,что a>g т.к. v>g ! Мы знаем, что i>d и что d>b, а отношения a к i из условия найти нельзя... Поэтому обладателем самой большой флешки может быть как и Аня так и Иван.
i,n:integer;
begin
write('Введите размер массивов');
readln(n);
setlength(m1,n);
setlength(m2,n);
setlength(m3,n);
//Заполнение массивов
for i:=0 to n-1 do begin
m1[i]:=random(21)-10;
m2[i]:=random(21)-10;
m3[i]:= m1[i]+m2[i];
end;
//Вывод массивов
for i:=0 to n-1 do write(m1[i]:4);
writeln;
for i:=0 to n-1 do write(m2[i]:4);
writeln;
for i:=0 to n-1 do write(m3[i]:4);
writeln;
end.
Тестовое решение:
Введите размер массивов 10
7 -10 9 -4 8 -6 10 4 6 2
10 -3 -2 -7 1 9 2 3 5 -6
17 -13 7 -11 9 3 12 7 11 -4