Наведите на правильный путь решения задач:
1. Напечатать таблицу значений функции y=sin(sqr(x)-0,5) на отрезке [-П,П] c шагом 0,1П
2. Даны вещественные векторы Х и У размером 10. Вывести на печать тот вектор длина которого больше.
Заранее спасибо.
Код
...
x:=-pi;
while x<=pi do
begin
y:=sin(sqr(x)-0,5);
writeln('y= ', y:16:4);
x:=x+pi/10;
end;
...
titanik, долго будем одно и то же спрашивать? Поиск -> "Табулирование" сделать тебе что, религия не позволяет?
2-я
Код
...
sum1:=0;
sum2:=0;
for i:=1 to 10 do
begin
sum1:=sum1+sqr(vect1[i]);
sum2:=sum2+sqr(vect2[i]);
end;
sum1:=sqrt(sum1);
sum2:=sqrt(sum2);
if sum1>sum2 then
{ 1-й больше}
else
{ 2-й больше}
...
Ozzя, большое спасибо.
То volvo: да искал я поиском извиняйте не нашел.