od1n0chka Если не ошибаюсь то декада месяца это треть от месяца, то: Code: #include <iostream.h> #include <conio.h> void main() { int i,j; float sum; float *mas=new float[10]; for(i=0;i<10;i++) //цикл для ввода температуры { cout<<i<<" den: "; cin>>mas[i]; } sum=0; for(i=0;i<10;i++) //подсчитываем сумму sum+=mas[i]; sum/=10; //средняя температура j=0; for(i=0;i<10;i++) if(mas[i]>sum) j++; //узнаём сколько раз темп. была выше средней cout<<"The temperature was more: "<<j; getch(); }
привет есть задания зделать типо генератора паролей тоесть указиваеш начало и конец примером 1 и 999 и указиваеш в какой файл сохранять тогда програма должна згенерировать файл в котором будут записи типо как 1 2 3 4 5 ... ... 999 забил сказать исполнить желательно на С++ спасибо
Привет ребят очень нужна помощь в написании програмки, возможно и за деньги (связь в ПМ)! Желательно на Visual Basic. или надругом Объектно ориентированном ЯП Есть небольшое пояснение Спасибо!
Ребята, кто может сделать практику? естественно не просто так. задания в принципе не тяжелые. Для некоторых из вас тут 5 минут на каждое. всего 6 штук. + нужны блок-схемы к каждой. Нужны вот такие программы. 1.Знайти суму елементів масиву речовинних чисел, що мають непарні номери. Розмірність масиву - 20. Заповнення масиву здійснити випадковими числами від 100 до 200. 2.Написати програму для обробки двовимірного масиву. В матриці М(N, M) поміняти місцями елементи рядків та стовпчиків. 3.Скласти програму, що видаляє в рядку все, що укладено між фігурними дужками і їх самих. 4.Скласти ітеративну функцію обчислення значення суми ряду. Скласти рекурсивну функцію обчислення суми ряду. Порівняти результати отриманих обчислень з результатом роботи стандартної функції мови програмування. http://s42.radikal.ru/i096/1105/ab/47149bcc7fa7.jpg 5. Задана послідовність цілих чисел. Знайти суму додатних значень, що кратні заданому Т. 6.Написать такую программу Довідник міст: -Назва міста. -ФПБ мера. -Площа. -Середня кількість населення. кто желает за это взятся - отпишите в скайп swiftness4
Нужно написать в с++ "Дані про температуру повітря й кількість опадів за декаду квітня зберігаються в масивах. Визначити кількість опадів, що випали у вигляді дощу та у вигляді снігу за цю декаду." Вообщем нужно: создать два массива, в первом про температуру, во втором про осадки..нужно показать сколько дней дождь и сколько снег и вообще был ли он!
Помогите! Нужно сделать простые задачки на паскале 1. Дан массив из 10 вещественных чисел. Выполнить ввод и вывод значений элементов массива после ввода исходных данных, после возведения в квадрат и возведения в 4 степень. 2. Вычислить сумму положительных элементов матрицы А(30,30) и количество их, используя процедуру
Здравствуйте. Помогите пожалуйста с задачами на C++ 1) Дана непустая последовательность непустых слов из латинских букв; соседние слова отделены друг от друга запятой ,за последним словом точка. Определить количество слов, которые начинаются и окончиваются одной и той же буквой. 2) Посчитать количество упорядоченных строк массива.
Rastor 1) Code: char *str="I,love,the,program,proverkap,and,still,love,the,little,fluffy,bunnies."; char *strt; int i=0; strt=strtok(str,",."); while(strt!=NULL) { if(strt[0]==strt[strlen(strt)]) i++; strt=strtok(NULL,",."); } cout<<"I="<<i; Сделал немного кривовато, на стринге было бы лучше... да и компиля под рукой нету, так что проверяй =) А второе задание я просто не понял -(
M1ks 1. Code: program one; uses crt; var m: array[1..10] of real; i: integer; begin write('Input 10 elementov:'); for i:=1 to 10 do readln(m[i]); writeln('V kvadrate: '); for i:=1 to 10 do begin m[i]:=sqr(m[i]); write(m[i]); write(' '); end; writeln('V 4-stepeni: '); for i:=1 to 10 do begin m[i]:=sqr(sqr(m[i])); write(m[i]); write(' '); end; readln; end. 2. Code: program two; uses crt; type matrix=array[1..30,1..30] of integer; procedure summatrix(A: matrix); var sum, kol, i, j: integer; begin sum:=0; kol:=0; for i:=1 to 30 do for j:=1 to 30 do if(A[i][j]>0) then begin sum:=sum+A[i][j]; kol:=kol+1; end; writeln('Summa: '); write(sum); writeln('Kol: '); write(kol); end; var m: matrix; i,j: integer; begin randomize; for i:=1 to 30 do for j:=1 to 30 do begin m[i][j]:=random(21)-10; write(m[i][j]); write(' '); end; summatrix(m); readln; end.
2 лабы (паскаль) 1.РАБОТА С ОДНОМЕРНЫМИ МАССИВАМИ ЗАДАНИЕ. Задав одномерный массив А целочисленных данных, реализовать обработку массива, как указано в варианте. Длина массива N<=20. Значения дополнительных переменных данные задать самостоятельно. Найти сумму всех отрицательных элементов массива A 2.ОРГАНИЗАЦИЯ ЦИКЛОВ И ОБРАБОТКА МАТРИЦ ЗАДАНИЕ. Задав квадратную матрицу A, состоящую из действительных элементов, реализовать его обработку, как указано в варианте. Исходные данные задать самостоятельно, учитывая специфику задачи. Найти сумму всех отрицательных элементов. может кто сможет поможет
Code: program sa; const n=20; var i,s:integer; a:array[1..n] of integer; begin for i:=1 to n do begin a[i]:=-50+random(100); writeln(a[i]); end; s:=0; for i:=1 to n do begin if a[i]<0 then s:=s+a[i]; end; writeln('s=',s); readln; end. Code: program sa; const n=5; var i,s,j:integer; a:array[1..n,1..n] of integer; begin for i:=1 to n do begin for j:=1 to n do begin a[i,j]:=-50+random(100); write(a[i,j]:8); end; writeln; end; s:=0; for i:=1 to n do begin for j:=1 to n do begin if a[i,j]<0 then s:=s+a[i,j]; end; end; writeln('s=',s); readln; end.
Всем привет Ситуация такая, нашел нужный мне код, а он на С++, сам в нем практически не ориентируюсь, но хорошо знаю Object Pascal (Delphi). Интересует только сишный синтаксис, с OpenGl проблем нет. Буду благодарен если найдется человек с 20 мин свободного времени и который сможет переписать всё что в си под делфи. В примере идут преобразования с четырехмерными координатами на трехмерное пространство, повороты и т.п. Code: #pragma comment(lib, "opengl32.lib") #pragma comment(lib, "glu32.lib") #include <windows.h> #include <gl\gl.h> #include <gl\glu.h> #include <gl\glut.h> #include <time.h> #include <math.h> GLUquadricObj *cylinder; struct vec { float x,y,z; vec(float x, float y, float z) : x(x), y(y), z(z) {} vec &operator-=(vec b) { x-=b.x; y-=b.y; z-=b.z; return *this; } vec &operator*=(float f) { x*=f; y*=f; z*=f; return *this; } }; float dot(vec a, vec b) { return a.x*b.x + a.y*b.y + a.z*b.z; } vec cross(vec a, vec b) { return vec(a.y*b.z - b.y*a.z, -a.x*b.z + b.x*a.z, a.x*b.y - b.x*a.y); } vec normalize(vec a) { return a*=1.f/sqrtf(dot(a,a)); } void DrawLine(vec a, vec b) { vec p = (vec(b) -= a); if (dot(p, p)<0.001) return; float len = sqrtf(dot(p, p)); p *= 1.f/len; vec z = vec(0, 0, 1); vec c = cross(p, z); if (dot(c, c) < 0.001) c = vec(1, 0, 0); glPushMatrix(); glTranslatef(a.x, a.y, a.z); glRotatef(-acos(dot(z, p))/3.14*180, c.x, c.y, c.z); gluCylinder(cylinder, 0.02, 0.02, len, 10, 10); glPopMatrix(); } clock_t start = clock(); void Display() { double t = 1.*(clock()-start)/CLOCKS_PER_SEC; glDepthMask(1); glClear(GL_COLOR_BUFFER_BIT | GL_DEPTH_BUFFER_BIT) ; glEnable(GL_DEPTH_TEST); glEnable(GL_LIGHTING); glEnable(GL_LIGHT0); glMatrixMode(GL_PROJECTION); glLoadIdentity(); gluPerspective(90, 1, 0.1, 10); glMatrixMode(GL_MODELVIEW); glLoadIdentity(); glTranslatef(0, 0, -1.5); float edge_color[4] = { 0, 1, 0, 0 }; glMaterialfv(GL_FRONT, GL_DIFFUSE, edge_color); float cub[2][2][2][2][4]; for (int x=0; x<2; ++x) { for (int y=0; y<2; ++y) for (int z=0; z<2; ++z) for (int w=0; w<2; ++w) { cub[x][y][z][w][0] = (2*x-1)*0.5; cub[x][y][z][w][1] = (2*y-1)*0.5; cub[x][y][z][w][2] = (2*z-1)*0.5; cub[x][y][z][w][3] = (2*w-1)*0.5; } } struct matrix { float m[4][4]; }; matrix rotation1, rotation2; for (int i=0; i<4; ++i) for (int j=0; j<4; ++j) rotation1.m[i][j] = i==j; for (int axe2 = 0; axe2<4; ++axe2) { for (int axe1 = 0; axe1<axe2; ++axe1) { rotation2 = rotation1; float phi = 10 + t*sqrtf(10+axe1*axe2 + axe1 + axe2)*0.1; float f[2][2] = { { cos(phi), -sin(phi) }, { sin(phi), cos(phi) } }; int axes[2] = { axe1, axe2 }; for (int i = 0; i < 2; ++i) for (int k = 0; k<4; ++k) rotation1.m[k][axes[i]] = 0; for (int i = 0; i < 2; ++i) for (int j = 0; j < 2; ++j) for (int k = 0; k<4; ++k) rotation1.m[k][axes[i]] += f[i][j]*rotation2.m[k][axes[j]]; } } float(*cub_ptr)[4] = cub[0][0][0]; float rotated_cub[16][4] = {}; for (int v=0; v<16; ++v) for (int i=0; i<4; ++i) for (int j=0; j<4; ++j) rotated_cub[v][i] += rotation1.m[j][i]*cub_ptr[v][j]; for (int v1=0; v1<16; ++v1) for (int v2=0; v2<v1; ++v2) if (!((v1 ^ v2)&((v1 ^ v2)-1))) DrawLine(*(vec*)&rotated_cub[v1], *(vec*)&rotated_cub[v2]); float red[4] = { 1, 0, 0, 0.2 }; float blue[4] = { 0, 0, 1, 0.2 }; glDisable(GL_LIGHTING); glDepthMask(0); glEnable(GL_BLEND); glDisable(GL_CULL_FACE); glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA); { glBegin(GL_QUADS); #define QUAD0(a, b, c, d) glVertex3fv(rotated_cub[a]);glVertex3fv(rotated_cub[b]);glVertex3fv(rotated_cub[c]);glVertex3fv(rotated_cub[d]); #define QUAD(a, b, c, d, bit); QUAD(0, 8, 12, 4, (2)); QUAD(0, 8, 10, 2, (4)); QUAD(0, 2, 6, 4, (8)); } glEnd(); glDisable(GL_BLEND); glutSwapBuffers(); } int main(int argc, char *argv[]) { glutInit(&argc, argv); glutInitWindowSize(700,700); glutInitDisplayMode(GLUT_RGBA|GLUT_DOUBLE | GLUT_DEPTH); glutCreateWindow("HyperCube 4D->3D Proection"); glutIdleFunc(Display); glutDisplayFunc(Display); cylinder = gluNewQuadric(); glutMainLoop(); } Возможный бонус: две 6xyza (inv) Если кто-то возьмется, желательно написать об этом в теме.
привет есть задания зделать типо генератора паролей тоесть указиваеш начало и конец примером 1 и 999 и указиваеш в какой файл сохранять тогда програма должна згенерировать файл в котором будут записи типо как 1 2 3 4 5 ... ... 999 забил сказать исполнить желательно на С++ спасибо ссилку з поста 3479 удалили и не успед сохранить(
Напишите пожалуйста на языке Си. Создать файл записей с полями: фамилия, номер телефона, заборгованисть.За один просмотр файла вывести фамилии абонентов и номера телефонов, в которых задолженность наибольшая.
Всем привет! Нужна проги на языке Pascal. Задания: 1) Напишите программу, которая по заданному вектору X формирует целочисленный вектор T, состоящий из знаков элементов вектора X (Ti = 1, если Xi > 0; Ti = 0, если Xi = 0; Ti = -1, если Xi < 0). 2) Напишите подпрограмму, определяющую наибольшее по модулю отклонение элементов двумерного массива от их среднего значения. 3) Напишите программу, которая в заданном предложении заменяет одну последовательность символов на другую. Напечатайте исходный и преобразованный тексты, а также число произведенных замен. 4) Создайте файл, содержащий фамилии студентов. Напишите программу печати списка студентов, имеющих самые длинные фамилии. Помогите кто чем может, буду очень признателен.
Держи дельфячий код. Перевести труда не составит... PHP: var i,a,b:integer; s:string; f:TextFile; begin Write('Vvedite na4alo '); Readln(a); Writeln('vvedite konec '); Readln(b); AssignFile(f,'c:/1.txt'); Rewrite(f); for i:=a to b do begin Writeln(i); str(i:2,s); Writeln(f,s); end; CloseFile(f); Readln; end.
Задание: Заполнение HDD данными, с учетом фрагментации. Т.е. Как что проиходит и т д . Реализация - любой язык. Предпочтительнее С # Детали и доп инфа в ПМ. Нужно срочно. Согласен оплатить работу.
ВСЕМ ПРИВЕТ ребята, надо решить школоло задачку на Pascal "Матрица H имеет 30 строк и 10 столбцов, в которые внесены оценки группы за первый семестр. Напечатать номера предметов, из которых в группе есть неудовлетворительные оценки." огромное спасибо кто поможет
