Code: void replace(int* mas, int size) { int max = mas[0]; // максимальный элемент массива int max_n = 0; // позиция максимального элемента в массиве // находим позицию максимального элемента for(int i=0; i<sizel i++) { if(mas[i] > max) { // виксируем только мервые максимальный элемент, остльные проверку не проходят max = mas[i]; max_n = i; } } for(; max_n < size; max_n++) { mas[max_n] += 0.5; } } 1. с такими вопросами обращаться в раздел для студентов 2. постыдился бы. Взял бы книжку да почитал бы.
Задачи. С++ помогите решить 1) Правые треугольные матрицы А и В порядка N заданы в виде последовательностей (N+1)N/2 чисел : сначала идет N элементов первой строки, затем N-1 элементов второй строки , начиная со второго, и т.д. (в последней N-ой строке только N-й элемент. Найти матрицу А(Е+В2), где Е – единичная матрица порядка N. 2) Даны действительные числа Ai, количество которых равно N2. Получить квадратную матрицу порядка N, элементами которой являются числа Ai, распо-ложенные по схеме, представленной на следующем рисунке: 3) Составить программу, переводящую десятичные числа в шестнадцатиричные и обратно. 4) Дан многочлен Р(х) степени N. Даны действительные числа А и В. Получить многочлен АхР2(х)+В. 5) Реакция организма на лекарство через N часов после инъекции выражается показателем RN, равным RN=ARN-1+0.4N, где R0=1, а А –положительное число, характеризующее данный препарат. Определить, через сколько часов наступит максимальная реакция на организм. После скольких часов реакция организма понизится ниже 50% начального уровня. 6) Заяц бежит вдоль заданной прямой с некоторой скоростью. Собака, находившаяся вначале на расстоянии L от зайца, бежит все время в направлении зайца со своей скоростью, большей заяьчей. Найти время, когда собака настигнет зайца. Построить «кривую погони».
Помогите плиз решить 1) Правые треугольные матрицы А и В порядка N заданы в виде последовательностей (N+1)N/2 чисел : сначала идет N элементов первой строки, затем N-1 элементов второй строки , начиная со второго, и т.д. (в последней N-ой строке только N-й элемент. Найти матрицу А(Е+В2), где Е – единичная матрица порядка N. 2) Даны действительные числа Ai, количество которых равно N2. Получить квадратную матрицу порядка N, элементами которой являются числа Ai, распо-ложенные по схеме, представленной на следующем рисунке: 3) Составить программу, переводящую десятичные числа в шестнадцатиричные и обратно. 4) Дан многочлен Р(х) степени N. Даны действительные числа А и В. Получить многочлен АхР2(х)+В. 5) Реакция организма на лекарство через N часов после инъекции выражается показателем RN, равным RN=ARN-1+0.4N, где R0=1, а А –положительное число, характеризующее данный препарат. Определить, через сколько часов наступит максимальная реакция на организм. После скольких часов реакция организма понизится ниже 50% начального уровня. 6) Заяц бежит вдоль заданной прямой с некоторой скоростью. Собака, находившаяся вначале на расстоянии L от зайца, бежит все время в направлении зайца со своей скоростью, большей заяьчей. Найти время, когда собака настигнет зайца. Построить «кривую погони».
Помогите. Задача по паскалю. Здравствуйте, нужно развязать небольшую задачу по паскалю. Вот задача: То есть, первым делом пользователь должен ввести количество цифр, которые нужно будет ввесть (условие, что N<1000). Дальше пользователь должен ввести сами цифры (N цифр). Например: То есть, берутся трех цифровые числа и суммируются. Если можно, загрузите на ФО паскаль-файл, с самим кодом. Если нет такой возможности, просто напишите мне исходник. Заранее благодарю за помощь. Нужно сделать в течении часа.
Code: var n,i,k,s:integer; begin s:=0; writeln('Vvedite n:'); readln(n); writeln('Vvedite ', n, ' chisel:'); for i:=1 to n do begin readln(k); if (k>99) and (k<1000) then inc(s,k); end; writeln('Rezultat:'); writeln(s); readln; end. ------------------------- add для s лучше поменять тип на более емкий
Помогите плиз решить задачу. Дан двумерный массив, нужно в нем поменять третью букву в пятой и седьмой строке местами. яп Си
Code: procedure TForm1.Button1Click(Sender: TObject); var mass:array[-100..400] of integer; i:integer; s:string; begin randomize; //gen for i:= 1 to 24 do begin mass[i]:=-61+random(211); end; Memo1.Lines.Add('Введеный массив'); for i:=1 to 24 do s:=s+floattostr(mass[i])+' '; Memo1.Lines.Add(s); end; Есть массив, надо отсортировать его по нажатию баттона линейным методом, по возврастанию.. Буду благодарен за помощь.
Здравствуйте.Прошу помощи, кому не лень напишите пожалуйста на языке Си вот такую задачу: Создать программу, которая из списков слов L1, L2 формирует новый список L, занося в него по одному разу те слова, содержащиеся хотя бы в одном из списков L1 и L2. Благодарю
Помогите решить задачу на C++ Помогите решить на С++ В двухмерном целочисленном массиве (размеры массива N, M и значения его элементов вводить с клавиатуры) найти указанное значение. Массив в памяти разместить динамически (с использованием операций new и delete), ввод исходных данных и вывод полученных результатов выполнить в основной функции, а решение задачи оформить в виде отдельной функции пользователя. Не использовать глобальных переменных. Найти число элементов массива = T и перемножить эти элементы. Значение Т вводится с клавиатуры.
Тема такая : Заполнение винчестера файлами с учетом фрагментации Нужно реализовать это как-то на любом языке. Как Диск заполняется данными я представляю. Что такое фрагментация, в целом, тоже. __ По идее , мне нужно сделать модель того как заполняется диск , как в него заливаются файлы с учетом того что они заполняются фрагментированными Или по другому. Описать процесс именно того, как фрагментируются файлы и записываются на диск Нужно разобраться, как это вообще можно сделать и на чем реализовывать. ? Буду признателен за помощь.
1) Моделирование работы концентратора. Нужно сделать, чтобы 4 компьютера были в виде ячеек, а концентратор должен определять адрес от кого передается и кому и читать сам пакет, которые передается, к примеру слово "привет" 2) Моделирование работы сетевого протокола. Разработать две проги, одна посылает, другая принимает пакет. В качестве пакета использовать файл содержащий слово "привет" надо на с++. цену укажите в личку.
Создание производных классов и освоение операторов управления доступом к компонентам класса. Данные для задачи (Т1)SymbString (Т2)DecString (Операции (методы))operator +(T&, T&) Нужно написать на с++ желательно на 2008 студии. Цену в личку
помогите реализовать следующее: отображать процесс извлечения данных из файла на progressbar. содержимое файла не известно, может быть как текст так и бинарник. туплю со вчерашнего дня. c sharp.
помогите записать результат функции int t() в текстовый файл #include "stdafx.h" #include <iostream> #include <cstring> #include <cstdio> using namespace System; using namespace std; struct Car { char model[15]; char seriya[15]; int year; int price;\ char avariya[15]; }; void Oseriya( const Car &); int t(); int main() { FILE *file; if ((file = fopen("3.txt","wt")) == NULL) printf("Файл невозможно открыть или создать\n"); else{ { fprintf (t()); } } fclose(file); cout<<'\n'<<t(); return 0; } int t() { setlocale(LC_ALL,"Russian"); int n; Car*masCar; cout<<"Сколько машин?-->"; cin>>n; masCar=new Car[n]; for(int a=0;a<n;a++) { cout<<"Марка-->"; cin>>masCar[a].model; cout<<"Модель-->"; cin>>masCar[a].seriya; cout<<"Год выпуска-->"; cin>>masCar[a].year; cout<<"Цена-->"; cin>>masCar[a].price; cout<<"Состояние аварийности-->"; cin>>masCar[a].avariya; } char name[15]; cout<<"Имя водителя-->"; cin>>name; for (int a=0;a<n;a++) { Oseriya(masCar[a]); } cout<<"\nВодитель"<<name<<'\n'; delete[]masCar; system("PAUSE"); return t(); } void Oseriya(const Car & b) { cout<<"\n_________________________________________________________________\n"; cout<<"\nМарка-"<<b.model; cout<<"\nМодель-"<<b.seriya; cout<<"\nГод выпуска-"<<b.year; cout<<"\nСостояние аварийности-"<<b.avariya; cout<<"\nЦена-"<<b.price; }
Помогите пожалуйста решить на Pascal: 1) 2) 2.2 Дан одномерный массив целых чисел. найти сумму всех четных элементов массива, стоящих на четных местах (имеющих четные номера). Массив задается с помощью генератора случайных чисел. 3) 3.2 Задана квадратная матрица А размером NxN (N<=10), состоящая из действительных элементов. Найти среднее арифметическое элементов каждой из нечетных строк этой матрицы. 4) 4.2 Пользователю, зарегистрированному на FTP-сервере, для получения доступа к файлам на нем нужно набрать в FTP- браузере команду вида: ftp://логин:пароль@адрес_сервера. Написать программу, которая из введенной строки выделяет логин, пароль и адрес FTP-сервера и выводит эту информацию на экран. Пример: Входная строка: Code: ftp://CoolUser:[email protected] Вывод: Адрес сервера: ftp.erunda.ru Логин: CoolUser Пароль: parol 5)Скрытый текст требуется (1 сообщение(ий), сейчас у вас 2): 5.2 Из введенного множества символов сформировать множество русских букв и вывести его упорядоченным по убыванию. При решении задачи обязательно использовать множественный тип. Заранее большое спасибо Сессия на носу надо поскорей сделать..
Помогите с программкой. Нужно написать на паскале: Найти сумму отрицательных элементов, находящихся на побочной диагонали квадратичной матрицы
WDS 4 года как не пользовался паскалем, может что и забыл, но задачи лёгкие то решил помочь: 1) Code: program one; var n,i: integer; rez: real; begin writeln('Input n: '); readln(n); if n>=10 then n:=10; for i:=1 to n do rez:=2*i/2*i+1; writeln('Output rez: '); write(rez); readln; end. 2) Code: program two; var mass: array[1..10] of integer; sum,i,buf: integer; begin randomize; for i:=1 to 10 do begin mass[i]:=random(100); write(mass[i]); write(' '); end; sum:=0; for i:=1 to 10 do begin buf:=i mod 2; if buf<>0 then continue; buf:=mass[i] mod 2; if buf<>0 then continue; sum:=sum+mass[i]; end; writeln('sum='); write(sum); readln; end. 3) Code: program three; var matr: array[1..5, 1..5] of real; sr,sum: real; i,j,buf: integer; begin randomize; for i:=1 to 5 do begin for j:=1 to 5 do begin matr[i,j]:=random(20); write(matr[i,j]); write(' '); end; writeln; end; for i:=1 to 5 do begin buf:=i mod 2; if buf=0 then continue; sum:=0; for j:=1 to 5 do sum:=sum+matr[i,j]; sr:=sum/5; writeln('Average: '); write(sr); writeln; end; readln; end. 4) коряво, но должно работать Code: program four; var str,strbuf,sbuf: string; i,j,buf: integer; begin write('Input str: '); readln(str); buf:=pos('@',str); strbuf:=copy(str,buf+1,length(str)); writeln('Adres: '); write(strbuf); writeln; i:=pos('//',str); strbuf:=copy(str,i+2,length(str)); j:=pos(':',strbuf); sbuf:=copy(strbuf,1,j-1); writeln('Login: '); write(sbuf); writeln; i:=pos('@',strbuf); sbuf:=copy(strbuf,j+1,i-j-1); writeln('Password: '); write(sbuf); readln; end.