1) Заполнить масив A(n,m) единицами по главной диагонали остальные элементы произвольные числа. Заполнить массив по второй диагонали значением суммы элементов по 2 стровек массив распечатать.
Доброго времени уважаемые! Помогите пожалуйста сделать програмку для курсовика. 1) Выполнить дискретизацию расчетной области в виде четырехугольника заданного координатами вершин: A(-3;0) B(0;5) C(4;3) D(4;-2). 2) Найти узловые неизвестные T(Xi,Yi) по заданному распределению температуры вдоль границы области T(X,Y)=3x^2+xy+5x+2y-3y^2. Вычислить максимальную относительную погрешность полученных результатов. 3) Построить семейство изотерм. Очень желательно на C++
Второй вота вот курсовик. Написать программу «Моя записная книжка». Предусмотреть возможность работы с произвольным числом записей, поиска за¬писи по какому-либо признаку (например, по фамилии, дате рождения или номеру телефона), добавления и удаления записей, сортировки по разным полям. Хранение данных организовать с применением контейнерного класса шар или multimap
Пара лаб: ИНТЕРПОЛЯЦИЯ ФУНКЦИЙ МНОГОЧЛЕНАМИ 1)Для заданной функции y(x) вычислить ее значения на отрезке [0,4] при x(икс итое(i)) = i, где i=0,1,2,3,4. Используя кусочно-линейную интерполяцию и интерполяционный многочлен Лагранжа L(x), вычислить значения функции в середине каждого локального интервала интерполяции. Сравнить полученные результаты с точными значениями. Построить в одной системе координат графики функций y=y(x) и y= L(x) y=1+xsinx 2). АППРОКСИМАЦИЯ ТАБЛИЧНЫХ ЗАВИСИМОСТЕЙ Аппроксимировать заданную табличную зависимость функцией вида g(x,a,b) и сравнить с аппроксимацией многочленом первой степени. Для всех вариантов заданы значения функции y(игрек житое(j)) при x j= i (i=1,2,...8). Дать графическую иллюстрацию полученных результатов. g(x)=ax+b/x (4,8; 5,7; 6,8; 8,9; 10,4; 12,7; 14,2; 16,6)
Помогите пожалуйста !!! допустим, что есть программа ( по решению транспортных задач ) можно ли эту прогу открыть ввиде кода???, и чем, если возможно ?? очень нужно несколько действий выдернуть...
Лаба на двоичные деревья (си) Народ помогите плиз.Очень надо. Условие: Из входной последовательности чисел составить двоичное дерево, а потом распечатать числа по уровням,начиная с корня.
До этого делал лабы сам, а тут трабла возникла, как это ни стыдно, но не могу понять что надо сделать, прошу помощи: Даны коэффициенты многочленов P(x) и Q(x) пятого порядка и вещественное число a. Вычислить величину P(a+Q(a)*(a+1)). Написать функцию (единственную), вычисляющую как P(x), так и Q(x). зы. ЯП Паскаль, но не критично
Как можно в языке C написать программу, которая бы выводила из текстового файла все символы кроме 0-9A-Za-z, т.е. русские символы. Допустим в текстовом файле написано "reggreg выприук !4t5dfsdf?*mvfgerFECCV". Знаю что должно как-то через функцию grep [^0-9A-Za-z] file; решаться но не знаю как. Помогите кому не сложно
Читаеш файл посимвольно если символ принадлежит диопазону от 0xc0 до 0xFF то выводиш. Так примерно как то: PHP: FILE *f; char c; f = fopen("123.txt","r+"); while(!feof(f)) { c = fgetc(f); if((c<=0xc0) && (c>=0xff)) printf("%c",c); }
Помогите кто может!!! №1 Вычислить все значения функции ф=корень из x квадрат + y квадратесли х и у это значения элементов массива х(n) и у(m) №2 определить количество положительных и отрицательных элементов в массиве х(n) №3 в массиве A(n,m) определить: а)максимальный и минимальный элементы б)номер последнего отрицательного в)заменить последний отрицательный элемент на минимальный №4в массиве A(n,m) найти разность между суммой элементов во 2 строке и суммой элементов в 5 столбце. Пожалуста!!! Просто очень нужно!
Code: procedure dothis; var x : array[1..5] of integer = (1,2,3,4,5,6); y : array[1..3] of integer = (1,2,3); i,j : integer; f : real; begin for i:=0 to 4 do for j:=0 to 2 do begin f := sqrt( x[i]*x[i] + y[j] * y[j] ); writeln(x[i],',',y[j],' = ',f); end; end;
Code: const x = array(1,2,-3,4,-5,6,7); y = array(1,-2,3); var pol, otr : integer; begin pol := 0; otr := 0; for i:=0 to 6 do if x[i]>=0 then inc(pol) else dec(pol); writeln('X: ','noJlo*uteJlbHux=',pol, 'oTPucaTeJlHux=',otr); pol := 0; otr := 0; for i:=0 to 2 do if y[i]>=0 then inc(pol) else dec(pol); writeln('Y: ','noJlo*uteJlbHux=',pol, 'oTPucaTeJlHux=',otr); end.
Всем привет! Помогите с двумя задачами - нужно написать на турбо паскале сие: Только первый и второй пример, с меня + и огромное спасибо. Желательно чтоб было написанно без проффисионализма =) Ну чтоб препод не запалил)
1. y:=sqrt(1-sqr(cos(x)*cos(x))); 2. Code: Program xya2; uses crt; var x,y:real; begin writeln('BBeguTe X'); readln(x); if (x<=0) then y:=cos(x)*(5-3*x) else y:=2*sqrt(x); writeln('Y = ',y); readln(); end. Неужели нет интереса научится хотябы немного программировать?=\
PHP: program Project1; {$APPTYPE CONSOLE} uses SysUtils; var y,x:real; begin write('vvedite znachenie x:'+#10#13); readln(x); writeln('x='+floattostr(x)); y:=sqrt(2*(1-cos(x)*cos(x))); write('y='+floattostr(y)); readln(x); { TODO -oUser -cConsole Main : Insert code here } end. PHP: program Project1; {$APPTYPE CONSOLE} uses SysUtils; var y,x:real; begin write('vvedite znachenie x:'+#10#13); readln(x); writeln('x='+floattostr(x)); if x>0 then begin y:=2*sqrt(x); end else begin y:=cos(x)*(5-3*x); end; write('y='+floattostr(y)+#10#13); readln(x); { TODO -oUser -cConsole Main : Insert code here } end.
Тоже спасибо!! Только странный какой то код... Мне не понятно вот это - {$APPTYPE CONSOLE} и floattostr это что такое, не видел ещё в паскале такого
