Помогите тупому студенту

[tupoi_student]

Помогите тупому студенту

Программирование-это не мое. А вот сдать надо

Даны два массива чисел X=(x1,x2,...,xn) и У=(у1,у2,...,уn). Найти массив R, у которого каждый элемент ri равен хi+уi


очень надеюсь на вашу помощь. спасибо

 

[Vladimir_S]

очень надеюсь на вашу помощь. спасибо

Увы, безнадёжно. Ничем помочь не сможем. По крайней мере, пока не узнаем, на каком языке программирования должна быть решена задача. Ну а это, судя по всему, самая строго охраняемая Вами тайна...

 

[AlexZir]

Владимир, судя по названию темы, до топикстартера вряд ли дойдет истинный смысл ваших сентенций, потому спросим попроще: на каком языке программирования программу писать надо?

Пока же рискну предложить решение в общем виде aka алгоритме, какое бы оно не было

1) определите 3 массива сначала
2) заполните исходные массивы значениями
3) в цикле обращайтесь в элементам результирующего массива по его номеру, присваивая ему сумму соответствующих элементов исходных массивов.
4) выводите результирующий массив на экран

 

[tupoi_student]

хе. Я выбрал правильный ник)) нужно на турбо паскале

 

[tupoi_student]

Alex_Zir, вы видите мой ник?! для меня это темный лес.

 

[AlexZir]

Вот это уже более предметный разговор Предположим, что массивы содержат вещественные числа, заданные случайно, тогда программа может быть следующей:

const n=10;
var
i:integer; 
x:array[1..n] of real;
y:array[1..n] of real;
r:array[1..n] of real;
begin
randomize;
writeln('   x[i]   ','   y[i]   ','   r[i]   ');
for i:=1 to n do begin
x[i]:=random*100;
y[i]:=random*100;
r[i]:=x[i]+y[i];
writeln(x[i]:10:4,y[i]:10:4,r[i]:12:4);
end;
readln
end.

 

[Vladimir_S]

Алекс, только у него сумма, а не произведение.

 

[AlexZir]

Ладно, углядели, поправил. Хотя что ему стоило самому эту бяку исправить? Так, пару-тройку кнопок нажать )

 

[tupoi_student]

Вот это уже более предметный разговор Предположим, что массивы содержат вещественные числа, заданные случайно, тогда программа может быть следующей:

const n=10;
var
i:integer; 
x:array[1..n] of real;
y:array[1..n] of real;
r:array[1..n] of real;
begin
randomize;
writeln('   x[i]   ','   y[i]   ','   r[i]   ');
for i:=1 to n do begin
x[i]:=random*100;
y[i]:=random*100;
r[i]:=x[i]+y[i];
writeln(x[i]:10:4,y[i]:10:4,r[i]:12:4);
end;
readln
end.

спасибо, AlexZir

 

[AlexZir]

Да не во что, кушайте - не обляпайтесь )