Сообщения без ответов | Активные темы


Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа




Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 938 • Страница 23 из 47 • <  1 ... 20  21  22  23  24  25  26 ... 47  >
  Пред. тема | След. тема 
В случае проблем с отображением форума, отключите блокировщик рекламы
Автор Сообщение
  pioneeer

Member
Статус: Не в сети
Регистрация: 11.11.2005
Откуда: Краснодар
работа с массивами в C++
Задание несложное, но поставило меня в тупик:

Элементы целого массива должны вводиться пользователем в окно редактирования (компонент Memo), каждое число - в отдельной строке. Вначале элементам целого массива присваиваются элементы строк, преобразованные к целому типу. Вычислить произведение массива. Результат вывести в строку состояния.\

КАК ?

_________________
Understand me, crazy maggots?

Реклама

Партнер
  Micher

Member
Статус: Не в сети
Регистрация: 09.12.2005
Откуда: Москва
Народ, ОЧЕНЬ СРОЧНО! надо "Функция и обращение к ней, найти площадь круга!" ПОЖАЛУСТА

_________________
CPU: Core i7 4770k (3.5Ghz@4.3Ghz, vCore 1.2)+Archon SB-E X2
Mobo: ASUS Z87 Pro (1205)
Mem: 2x Corsair 1866Mhz
Video: MSI N660Ti PE 2GD5@1070/7000

  mein

Advanced member
Статус: Не в сети
Регистрация: 09.03.2004
Откуда: Кишинёв
Micher
Код:
double Square(double r){ return (3.14159*r*r); }
void main(){
     double s = Square(4.5);
}
  Micher

Member
Статус: Не в сети
Регистрация: 09.12.2005
Откуда: Москва
говорят через float надо

_________________
CPU: Core i7 4770k (3.5Ghz@4.3Ghz, vCore 1.2)+Archon SB-E X2
Mobo: ASUS Z87 Pro (1205)
Mem: 2x Corsair 1866Mhz
Video: MSI N660Ti PE 2GD5@1070/7000

  mein

Advanced member
Статус: Не в сети
Регистрация: 09.03.2004
Откуда: Кишинёв
Micher Ну в чём проблема?! замени все слова "double" на "float"
  Kuri_Bambuk

Member
Статус: Не в сети
Регистрация: 29.11.2004
Условие:
Надо что бы читало из файла

Задача:
Дана квадратная матрица A размер 4.Составить матрицу симметричную данной относительно побочной диагонали. Результат записать на место исходной матрицы.

Примечание:
Делать надо с функций.

ps: на си
Отредактировано модератором: mein. Дата: 20.12.2006 23:08

_________________
Мой ICQ 191723919 рад всем )))

  Sir_BB

Member
Статус: Не в сети
Регистрация: 05.06.2005
Откуда: Москва
Помогите, пожалуйста с прогой. Есть прога Delphi
Цитата:
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Menus, ExtCtrls;

type
TForm1 = class(TForm)
Shape1: TShape;
MainMenu1: TMainMenu;
Figure1: TMenuItem;
Rectangle1: TMenuItem;
Ellipse1: TMenuItem;
RoundRect1: TMenuItem;
Circle1: TMenuItem;
RoundSquare1: TMenuItem;
Color1: TMenuItem;
LightRed1: TMenuItem;
LightGreen1: TMenuItem;
LightBlue1: TMenuItem;
Style1: TMenuItem;
Solid1: TMenuItem;
Clear1: TMenuItem;
Cross1: TMenuItem;
DiagCross1: TMenuItem;
Fdiagonal1: TMenuItem;
Exit1: TMenuItem;
N1: TMenuItem;
LightRed2: TMenuItem;
LightGreen2: TMenuItem;
LightBlue2: TMenuItem;
procedure FormCreate(Sender: TObject);
procedure Rectangle1Click(Sender: TObject);
procedure Ellipse1Click(Sender: TObject);
procedure RoundRect1Click(Sender: TObject);
procedure Circle1Click(Sender: TObject);
procedure RoundSquare1Click(Sender: TObject);
procedure LightRed1Click(Sender: TObject);
procedure LightGreen1Click(Sender: TObject);
procedure LightBlue1Click(Sender: TObject);
procedure Solid1Click(Sender: TObject);
procedure Clear1Click(Sender: TObject);
procedure Cross1Click(Sender: TObject);
procedure DiagCross1Click(Sender: TObject);
procedure Fdiagonal1Click(Sender: TObject);
procedure Exit1Click(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure LightRed2Click(Sender: TObject);
private
BrushColor:TColor;
BorderColor:TColor;
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
BrushColor:=RGB(0,0,255);
Shape1.Brush.Color:=BrushColor;
Shape1.Pen.Color:=clWhite;
Shape1.Pen.Width:=2;
end;

procedure TForm1.Rectangle1Click(Sender: TObject);
begin
Shape1.Shape:=stRectangle;
end;

procedure TForm1.Ellipse1Click(Sender: TObject);
begin
Shape1.Shape:=stEllipse;
end;

procedure TForm1.RoundRect1Click(Sender: TObject);
begin
Shape1.Shape:=stRoundRect;
end;

procedure TForm1.Circle1Click(Sender: TObject);
begin
Shape1.Shape:=stCircle;
end;

procedure TForm1.RoundSquare1Click(Sender: TObject);
begin
Shape1.Shape:=stRoundSquare;
end;

procedure TForm1.LightRed1Click(Sender: TObject);
begin
BrushColor:=RGB(255,0,0);
Shape1.Brush.Color:=BrushColor;
end;

procedure TForm1.LightGreen1Click(Sender: TObject);
begin
BrushColor:=RGB(0,255,0);
Shape1.Brush.Color:=BrushColor;
end;

procedure TForm1.LightBlue1Click(Sender: TObject);
begin
BrushColor:=RGB(0,0,255);
Shape1.Brush.Color:=BrushColor;
end;

procedure TForm1.Solid1Click(Sender: TObject);
begin
Shape1.Brush.Color:=BrushColor;
Shape1.Brush.Style:=bsSolid;
end;

procedure TForm1.Clear1Click(Sender: TObject);
begin
Shape1.Brush.Color:=BrushColor;
Shape1.Brush.Style:=bsClear;
end;

procedure TForm1.Cross1Click(Sender: TObject);
begin
Shape1.Brush.Color:=BrushColor;
Shape1.Brush.Style:=bsCross;
end;

procedure TForm1.DiagCross1Click(Sender: TObject);
begin
Shape1.Brush.Color:=BrushColor;
Shape1.Brush.Style:=bsDiagCross;
end;

procedure TForm1.Fdiagonal1Click(Sender: TObject);
begin
Shape1.Brush.Color:=BrushColor;
Shape1.Brush.Style:=bsFDiagonal;
end;

procedure TForm1.Exit1Click(Sender: TObject);
begin
Close;
end;

procedure TForm1.N1Click(Sender: TObject);
begin
Close;
end;

procedure TForm1.LightRed2Click(Sender: TObject);
begin
BorderColor:=RGB(255,0,0);
Shape1.Border:=BorderColor;
end;

end.

Нужно добавить выбор цвета окантовки геометрической фигуры по выбору пользователя, внести изменения в дизайн меню:
- назначить пунктом меню растровое изображение;
- назначить пунктом меню растровые изображения;
- доп. цвета окантовки поставить в виде допонительных (нижнего уровня);
- сделать недоступным пункты меню, отображаемые в данный момент;
Заранее спасибо
  Xupyp1

Member
Статус: Не в сети
Регистрация: 02.12.2004
Sir_BB писал(а):
выбор цвета окантовки геометрической фигуры по выбору пользователя

Использовать TColorDialog. Н-р:
Код:
if cd.execute then
    BorderColor:=cd.color;


Sir_BB писал(а):
назначить пунктом меню растровое изображение;

Насколько я знаю, стандартными средствами возможна лишь установка иконки для пункта меню.
Для этого можно использовать TImageList.
Sir_BB писал(а):
сделать недоступным пункты меню, отображаемые в данный момент;

А зачем тогда меню, если те пункты которые отображаются в данный момент будут недоступны?
Sir_BB писал(а):
доп. цвета окантовки поставить в виде допонительных (нижнего уровня);

Не понял вопрос.
  Sir_BB

Member
Статус: Не в сети
Регистрация: 05.06.2005
Откуда: Москва
Цитата:
Sir_BB писал(а):
доп. цвета окантовки поставить в виде допонительных (нижнего уровня);

Не понял вопрос.

То есть сделать подменю.
Цитата:

Насколько я знаю, стандартными средствами возможна лишь установка иконки для пункта меню.
Для этого можно использовать TImageList.

Щелкаем на каклм-нибудь Item у MainMenu, св-во Bitmap, выбираем BMP-изображение.
Цитата:
Sir_BB писал(а):
сделать недоступным пункты меню, отображаемые в данный момент;

А зачем тогда меню, если те пункты которые отображаются в данный момент будут недоступны?

То есть если я выбрал пункт меню, то Enabled:=False;

Xupyp1 Спс за то, что откликнулись.
Прогу я доделал, если кого-то интересует, могу выложить листинг.
  Keld

Member
Статус: Не в сети
Регистрация: 11.04.2006
Откуда: Самара
Народ, сижу на зачете препод пока вышел. Надо СРОЧНО решить задачу на Паскале 7.0.
Условие: Дана действительная матрица 18хN. Найти значение наибольшего по модулю элемента матрицы, а также индексы какого-нибудь элемента с найденным значением модуля. Помогите пожалуйста!
  Beautyclocker

Помогите пожалуйста выполнить следующие задания...а то кто реально не знает, что такое метод индуктивной функции!
1. Дана последовательность вещественных чисел, заданная в типизированном файле. Методом индуктивной функции вычислить среднюю длину связных подпоследовательностей отрицательных чисел. Подпрограмма должна быть написана в стиле защитного программирования. Обязательно наличие полной спецификации в виде комментария под заголовком и комментариев к тексту подпрограммы, поясняющих метод индуктивной функции. Все необходимые типы данных описать перед заголовком подпрограммы.
2. Составить полную спецификацию к подпрограмме, которая должна решать указанную задачу. Описать необходимые типы данных. Предполагается, что подпрограмма будет написана в стиле защитного программирования.
Определить коэффициенты разложения по заданному базису в n-мерном пространстве
заданного n-мерного вектора
  HotGuy

Member
Статус: Не в сети
Регистрация: 04.12.2005
Откуда: Е-бург
Фото: 0
помогите на паскале надо : Даны натуральное числоN и последовательность A1, A2, .. ,A N. В данной последовательности определить число соседств двух положительных чисел.
Добавлено спустя 1 минуту, 37 секунд
считывать и выводить в файл

_________________
there's no greater power than the power off ©

  -NiksoN-

Member
Статус: Не в сети
Регистрация: 28.06.2006
Откуда: Москва
Вобщем так. нужен текст программы крестики - нолики с полем 100х100. Выигрывают 5 крестиков(ноликов) в ряд. Исходник нужен на паскале или делфи. Это задание обычно задают на первом курсе в институте. Думаю у кого нить должно быть. В долгу не остануь(с меня что нить на ваше усмотрение в пределах разумного, а если бесплатно то вообще супер и огромный респект:)). Текст проги нужен до 4-5 января.

контакты:
ася 304875664
тел 89265021586
мыло: Niksonnnn@yandex.ru
  ALEXXX

Junior
Статус: Не в сети
Регистрация: 09.05.2003
Откуда: Краснодар
Люди. Нужна курсовая по Паскалю : типизированные файлы, записи. Может у кого завалялась?
  Navern

Member
Статус: Не в сети
Регистрация: 08.10.2006
Откуда: Москва
Вот, упростил код донельзя для простоты понимания того, чего мне надо:

Код:
<?php
$file = "http://tmnstats.rockweb.org/xml_ranking_players.php?country=RUS&limit=1";
$stroka = file("$file");
echo "<div style='font-size: 100px;'>";
echo ($stroka[8]);         // Исходное число
echo "<br>";
echo floor($stroka[8]);    // Пробуем округлить
echo "<br>";
echo ceil($stroka[8]);     // Опять пробуем округлить
echo "<br>";
echo round($stroka[8]);    // И ещё разок
echo "</div>";
?>


Надо, чтобы работало. =) Суть в том, что число вместо округления обращается в 0. Почему - не знаю, пока думал, сломал мозг. Помогайте, пожалуйста.

_________________
"Если всё пошло не так, сделай вид, что именно так и задумывалось." (с)

  Mr.Roman

Member
Статус: Не в сети
Регистрация: 13.03.2004
Откуда: Орел
Кто что делает, мугага.
А формат значения в переменной "строка 8" не пробовал перевести из текстового в числовой ? (незнаю существует ли такое, но поищи) =))

А вообще почитай повнимательнее доку по этим трем командам, может нужны доп параметры.

_________________
GeForce 256 > Ati R9000-II > G FX 5700 > G 6600GT > G 6800 > G 7900GS > G GTX 260 AMP2 > G GTX 480 (Gigabyte SOC) > G GTX 1080

  Navern

Member
Статус: Не в сети
Регистрация: 08.10.2006
Откуда: Москва
Просил помочь, а не отослать в руководство...

Естественно пробовал. Мало того, он уже числовой, посколько, согласно тому же мануалу, в который вы пытаетесь меня направить, в числе имеется плавающая точка, что автоматически переводит строку в разряд числовых.

Дополнительные параметры есть, но в данном конкретном случае они являются необязательными. Естественно я всё это читал, иначе бы не спрашивал.

В общем мне тут на пхп.нет помогли. Может кто вдруг столкнётся. В общем, надо было воспользоваться такой конструкцией: echo round(strip_tags($r[$i2_3]))."\n";. Сначала от переменной следовало отрезать все хтмл-приблуды при помощи strip_tags, а только потом округлять. Не знал...

_________________
"Если всё пошло не так, сделай вид, что именно так и задумывалось." (с)

  RatwielleR

Member
Статус: Не в сети
Регистрация: 08.04.2006
Откуда: Красноярск
Помогите пожалуйста построить алгоритм решения задачи!

Дано действительное число Х. Не используя стандартные функции(за исключением abs), вычислить сумму следующего ряда с заданной точностью Е>0(Е, х вводятся с клавиатуры)

1+x/1!+x^2/2!+...+x^n/n!+...
  Билли Бонс

Member
Статус: Не в сети
Регистрация: 24.12.2005
RatwielleR
Код:
int main()
{
    double x, e;
    cin >> x >> e;

    unsigned int n = 1;
    double sum = 1.0, cur = 1.0;
    while ( true )
    {
        cur *= x/n;
        ++n;
        sum += cur;
        if ( cur < e ) break;
    }
    cout << sum << endl;
}
  RatwielleR

Member
Статус: Не в сети
Регистрация: 08.04.2006
Откуда: Красноярск
Билли Бонс спасибо, а это чё за язык? Объясни пожалуйста ламеру чё есть чё, и как всё енто работает.
Буду очень-очень благодарен!!!
Будет ПРОСТО СУПЕР, если ты объяснишь чё означает каждый фрагмент.
Показать сообщения за:  Поле сортировки  
Начать новую тему Новая тема / Ответить на тему Ответить  Сообщений: 938 • Страница 23 из 47 • <  1 ... 20  21  22  23  24  25  26 ... 47  >
-

Список форумов » Специализированные форумы » Программирование

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3

Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Перейти:  
Создано на основе phpBB® Forum Software © phpBB Group
Русская поддержка phpBB | Kolobok smiles © Aiwan