Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Delphi простой вычислитель Здрасвствуйте,мне нужно создать маленкую программку, для диспетчера такси, где в поле Edit написав цифры (например 17,5километров) он автоматически эти километры умножал на 0,5 (цена) и в этоге получалась сумма. Знаю что очень легко,но не разбираюсь. https://www.cyberforum.ru/ delphi-beginners/ thread1667710.html Delphi Сформировать двухмерный массив по формуле
Помогите пожалуста с заданием про программированию. (просто сам совсем не соображаю в нем) 1.Сформировать двухмерный массив А, элементы которого вычислить в соответствии с выражением(на фото пункт 1) 2.сформировать одномерн массив Х элементы которого вычисляются в соответствии с заданным алгоритмом(на фото пункт 2) и зависят от элементов двухмерного массива 3. вычислить значение ф-ции G,...
Delphi Перенести в форму sMemo delphi7 данные с сайта - Delphi Есть сайт http://******/list.txt Нужно перенести данные с сайта в поле sMemo1. А данные на русском языке , нужно чтобы он был тоже на русском языке в программе! Точно подробно пожалуйста опишите. ======================================== Вот сам код ======================================== procedure TForm1.Button1Click(Sender: TObject); begin memo1.Lines.Text:= IdHttp1.Get... https://www.cyberforum.ru/ delphi-beginners/ thread1667620.html Delphi Вход с программу с ключом | Delphi 7 https://www.cyberforum.ru/ delphi-beginners/ thread1667617.html
Дорогие программисты кто знает код .. Нужно чтобы программа активировалась с ключa , а ключи находятся на сайте в .txt(Их там много) Нужно чтобы он определил тот самый нужный .. =========Кто знает напишите пож========= Использовал вот такой код . procedure TForm1.btn1Click(Sender: TObject); var s,a,g:string; Version:TStringList;
Найти минимальный элемент массива и вывести на экран все номера элементов массива равные минимальному Delphi
Найти минимальный элемент массива и вывести на экран все номера элементов массива равные минимальному(Delphi)
Delphi Сохранение графика в файл остовного дерева и загрузка его Возникла проблема с Сохранением нарисованного графика остовного дерева в файл . И так координаты вершин узлов у меня хранятся в массиве те каждая координата по х и по у хранятся в разных массивах . Есть массив который отвечает за матрицу смежности . И возникает вопрос что и как мне нужно сохранить чтобы при загрузке файла у меня отображался на image тот же график и чтобы я мог его изменять так... https://www.cyberforum.ru/ delphi-beginners/ thread1667574.html
Delphi Графика: как правильно строить графики? https://www.cyberforum.ru/ delphi-beginners/ thread1667569.html
Нужна инфа как строить правильно графики. Вот у меня есть код на постройку графика.Как мне самому выбирать по какому столбцу строить график?В данном примере оно строит по последнему ряду и Ряд2, но его нету в графике. Перед этим у меня выводится таблица, х - количество столбцов.Может кто растолковать? Chart:=E.WorkBooks.Charts.Add; Chart.ChartType:=51;...
Delphi RichEdit - вставка подчеркнтуого текста из Edit
Подскажите, пожалуйста, как вставить текст в RichEdit из Edit с подчеркиванием? Есть кнопка, которая добавляет текст в определенную строку, ниже код: procedure TForm4.Button1Click(Sender: TObject); begin richedit1.Lines.Strings:=('Свидетельство № ' + edit1.text) end; Так вот, как сделать, чтобы был подчеркнут именно текст из Edit1?
Delphi Как свернуть форму в панель задач? https://www.cyberforum.ru/ delphi-beginners/ thread1667529.html
Есть программа borderstyle= bsnone,сворачиваю кнопкой. нашел такой способ: Сворачивание procedure TForm3.Image7Click(Sender: TObject); begin Form3.Hide; Trayicon1.Visible:=true; end; Возврат procedure TForm3.TrayIcon1Click(Sender: TObject);
Delphi Создать приложение, вычисляющее значения переменных по заданным расчетным формулам Создать приложение, вычисляющее значения переменных по заданным расчетным формулам и наборам исходных данных. На экран вывести значения вводимых исходных данных и результаты вычислений, сопровождая ввод и вывод поясняющими комментариями. https://www.cyberforum.ru/ delphi-beginners/ thread1667522.html
Delphi Найти среднее геометрическое элементов массива
Найти среднее геометрическое элементов массива с k1 по k2, где k1 и k2, вводятся с клавиатуры. (Delphi)
Delphi Ошибка: E2066 Missing operator or semicolon Здравствуйте,подскажите почему вылазит ошибка:E2066 Missing operator or semicolon. Вот код: unit Unit1; interface uses Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, ExtCtrls; https://www.cyberforum.ru/ delphi-beginners/ thread1667484.html
0 / 0 / 0
Регистрация: 01.12.2015
Сообщений: 1
0

Построить блок-схему к этому коду - Delphi - Ответ 8785574

21.02.2016, 17:25. Показов 891. Ответов 1
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Нужно построить блок-схему к функции. Программа работает по формуле F=G*(m1*m2)/r*r

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var
  Form5: TForm5; 
    A, B, Sila: real;
  function Sil(A, B,r: real): real;
 
implementation
{$R *.dfm}
 
procedure TForm5.Button1Click(Sender: TObject);
var m1,m2,r,F,G :real; 
begin
 m1:= strtofloat(Edit1.Text);
 m2:= strtofloat(Edit2.Text);           
 r:= strtofloat(Edit3.Text);
 Sila:=Sil(A, B,r); 
 Edit4.Text:= floattostr(Sila); 
end;
 
function Sil(A, B, r:real):real; 
begin
 Sila:=G*(A*B)/sqr(r);
end;


Вернуться к обсуждению:
Построить блок-схему к этому коду Delphi
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.02.2016, 17:25
Готовые ответы и решения:

Построить блок-схему по коду
Program project1; uses crt; var s,a:string; i,k,min,max,max1,min1,t:integer; b:boolean;...

Построить блок-схему по коду
Решение методом Гаусса. Нужно построить блок-схему по коду. Помогите пожалуйста. unit GaussU1; ...

Построить блок схему по программному коду
Дан массив натуральных чисел размерности n , содержащий некоторое количество одинаковых чисел....

Построить блок схему по данному коду
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics,...

1
21.02.2016, 17:25
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.02.2016, 17:25
Помогаю со студенческими работами здесь

Как создать блок-схему по этому коду?
program case1; Procedure Case2(a:integer); begin Writeln ('Ведите число дня недели'); ...

Не могу сделать к этому коду блок-схему алгоритма
Помогите как сделать.. <html> <head> <script language = "JavaScript"> function calc(x) { ...

Если есть добрые люди, напишите пожалуйста блок-схему к вот этому коду!
Помогите пожалуйста uses crt; const ...

построить блок-схему цикл к этому уравнению
http://webfile.ru/4030424

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru