Смотрите видео ниже, чтобы узнать, как установить наш сайт в качестве веб-приложения на домашнем экране.
Примечание: Эта возможность может быть недоступна в некоторых браузерах.
Добро пожаловать на компьютерный форум Tehnari.ru. Здесь разбираемся с проблемами ПК и ноутбуков: Windows, драйверы, «железо», сборка и апгрейд, софт и безопасность. Форум работает много лет, сейчас он переехал на новый движок, но старые темы и аккаунты мы постарались сохранить максимально аккуратно.
Форум не связан с магазинами и сервисами – мы ничего не продаём и не даём «рекламу под видом совета». Отвечают обычные участники и модераторы, которые следят за порядком и качеством подсказок.
Если вы у нас впервые, загляните на страницу о форуме и правила – там коротко описано, как задать вопрос так, чтобы быстро получить ответ. Чтобы создавать темы и писать сообщения, сначала зарегистрируйтесь, а затем войдите под своим логином.
Помогите, пожалуйста, написать программу на языке С++. Этот язык начала изучать совсем недавно, поэтому возникают некоторые сложности..
Задание: Определить функцию, которая принимает на вход массив размерностью 4. Сделать перестановку на k-шагов.
То есть, нужно написать функцию, вызывающую данную. вот начало, не уверена, что правильно.
int m [4] = {1, 2, 3}
int result = ar [4]
if (result < int m );
void f (int*ar, int i)
К сожалению в каждой строчке по ошибке.
int m [4] = {1, 2, 3} //не хватает элемента
int result = ar [4] //не хватает точки с запятой
if (result < int m [i]); //это бессмысленно. Точка с запятой говорит о том, что если условие выполнилось, нужно переходить дальше, ничего не делая.
void f (int*ar, int i) //не бывает функций внутри функций. Это не Паскаль.
void f(int* ar)
{
//работаем с массивом
}
int main()
{
int ar[4];
//что-то делаем
f(ar); // вызываем функцию
}
Может кто-нить помочь? Я в Paskal-е только только начинаю разбираться а по учёбе уже надо курсовую делать по этим темам:
1.разработать программу "Выравнивание", выравнивающую текст по краям
2.разработать справочную систему по операторам языка Турбо Паскаль
3.разработка программы Будильник
4.разработка программы определяющей наличие неописанных идентификаторов в тексте программы на Паскале
5.разработка программы позволяющей сжимать текстовую информацию, а затем преобразовывать сжатую информацию в исходное состояние разработка программы удаляющей из матрицы (А) строку и столбец, содержащие наибольший элемент матрицы разработка программы устанавливающей идентификацию отпечатков пальцев разработка процедуры исключения вершины из двоичного дерева.
Если бы у меня было больше времени...Вобщем надо написать программу(любую из предложенных) а я даже не знаю с чего начать...осталось 1,5 недели. Что-то от паники совсем голова не робит...
Может кто-нить помочь? Я в Paskal-е только только начинаю разбираться а по учёбе уже надо курсовую делать по этим темам:
разработка программы удаляющей из матрицы (А) строку и столбец, содержащие наибольший элемент матрицы
Или я чего-то недопонимаю, но с моей точки зрения это "задачка" для целого коллектива профессиональных программистов-суперов.разработка программы устанавливающей идентификацию отпечатков пальцев
Или я чего-то недопонимаю, но с моей точки зрения это "задачка" для целого коллектива профессиональных программистов-суперов.
А графический редим сожно использовать? Если да, то очень легко написать программу №1.
1. Вычислить приближенно значение суммы с точностью до
e=0.0001, S= 1 - 1/(2*3) + 1/(3*4)**2 - 1/(4*5)**3...
(S= 0,84015)
CONST
e=0.0001;
VAR
i:INTEGER;
S,a:REAL;
function X2np(X:Extended; n:WORD):Extended;
Var i:INTEGER;
Y:Extended;
BEGIN
IF n=0 THEN X2np:=1 ELSE
IF n=1 THEN X2np:=X ELSE
BEGIN
Y:=X;
FOR i:=2 TO n DO Y:=Y*X;
X2np:=Y;
END;
END;
BEGIN
S:=1;
i:=0;
REPEAT
INC(i);
a:=X2np(-1,i)/X2np((i+1)*(i+2),i);
S:=S+a;
UNTIL ABS(a)<e;
WriteLn('S= ',S:7:5);
ReadLn;
END.
2. Найти наибольшее и наименьшее значение функции
y= (a*x**2+b*x+c)*sin(x) при
изменении x от xнач до xкон с шагом h. Вывести значения y.
Исходные данные:
a = 2.14; b= - 4.21; c = 3.25; xнач= -4.5; xкон = -13.5;
h= 0.5 .
(min=-361.783 max=308.497)
CONST
a=2.14;
b=-4.21;
c=3.25;
Xbeg=-4.5;
Xfin=-13.5;
h=0.5;
VAR
x,y,min,max:REAL;
FUNCTION f(x:real):REAL;
BEGIN
f:=(a*x*x+b*x+c)*sin(x);
END;
BEGIN
min:=f(Xbeg);
max:=min;
x:=Xbeg;
WHILE ROUND(x*100)>=ROUND(Xfin*100) DO
BEGIN
y:=f(x);
WriteLn(x:6:1,y:10:3);
IF y>max THEN max:=y;
IF y<min THEN min:=y;
x:=x-h;
END;
WriteLn('Min= ',min:8:3);
WriteLn('Max= ',max:8:3);
ReadLn;
END.
3. Вычислить бесконечную сумму (-1)**n * x**/n! где
n=1,2,3... с точностью e =0.001 . Значение x ввести с клавиатуры.
(X=4.5, S=-0.989)
CONST
e=0.001;
VAR
i:INTEGER;
S,a,x:REAL;
BEGIN
Write('x= ');
ReadLn(x);
S:=0;
i:=0;
a:=1;
REPEAT
INC(i);
a:=-a*x/i;
S:=S+a;
UNTIL ABS(a)<e;
WriteLn('S= ',S:6:3);
ReadLn;
END.
Если чего непонятно - спрашивай, объясню.Все три делать не обязательно, можно хотя бы 1-ю но параллельно обьяснить чего там наделано