Ви не увійшли. Будь ласка, увійдіть або зареєструйтесь.
Ласкаво просимо вас на україномовний форум з програмування, веб-дизайну, SEO та всього пов'язаного з інтернетом та комп'ютерами.
Будемо вдячні, якщо ви поділитись посиланням на Replace.org.ua на інших ресурсах.
Для того щоб створювати теми та надсилати повідомлення вам потрібно Зареєструватись.
Український форум програмістів → Pascal/Delphi → Допоможіть будь ласка по делфі скласти блок алгоритмічну схему
Сторінки 1
Для відправлення відповіді ви повинні увійти або зареєструватися
виклади код, по світлинам нічого не зрозуміло
Це що, завдання з інформатики вже дійшли до рівня "знайти, на якій фотографії зображено блок-схему"?
він тільки мені в ПП написав?
На щастя так
procedure TForm1.BtnClick(Sender: TObject);
var F : string;
begin
if not (Sender is TButton) then Exit;
F := '?';
edt3.Text:= '';
C := 0;
if TryEdToExt(edt1, A) and TryEdToExt(edt2, B)
then begin
try
case (Sender as TButton). Tag of
1 : begin
F := ' + ';
C :=A + B;
ExprReport(edt1.Text, F, edt2.Text, C, Memo1);
end;
2 : begin
F := ' - ';
C := A - B;
ExprReport(edt1.Text, F, edt2.Text, C, Memo1);
end;
3 : begin
F := ' * ';
C :=A * B;
ExprReport(edt1.Text, F, edt2.Text, C, Memo1);
end;
4 : begin
F := ' / ';
C :=A / B;
ExprReport(edt1.Text, F, edt2.Text, C, Memo1);
end;
5 : begin
F := ' ^ ';
C :=Power(A,B);
ExprReport(edt1.Text, F, edt2.Text, C, Memo1);
end;
end;
edt3.Text:=FloatToStr(C);
except
ShowMessage('Вибач не під силу мені виконати: '
+ edt1.Text + F + edt2.Text);
end;
end;
end;В тебе взагалі усе не вірно
нащо ти повторюєш
ExprReport(edt1.Text, F, edt2.Text, C, Memo1);
?
Нащо тобі той try? в тебе помилка може бути лише при переведенні рядка в число. от там і роби try.
Нащо тобі перевіряти, чи то кнопка чи ні?
Нащо це
F := '?';
edt3.Text:= '';
?
Нащо той мсджбокс? тобі лише потрібно підсвітити поля в яких невірні дані
я там создав чекбокс а трай там через те що там захист присвоювався до всього чек боксутам це де? а нащо тому чекбоксу захист?
Не розуміеш?
Пане ur_naz, тут у нас десь була тема зі своїми програмами - то вам не важко було б викласти туди зразки вашого коду, скажімо, за перший рік вивчення програмування?
Ну, щоб ми покоментували у вашому стилі?
нажаль то було на спектрумі і код не зберігся. Ба більше, він навіть не зміг скомпілюватись, бо кількість рядків коду перевищила 65535...
...бо кількість рядків коду перевищила 65535...
І то була перша програма? Знімаю шапку.
ur_naz написав:...бо кількість рядків коду перевищила 65535...
І то була перша програма? Знімаю шапку.
Ну, от людина в поважному віці, а такою нісенітницею займається.
Сором.
нажаль то було на спектрумі і код не зберігся. Ба більше, він навіть не зміг скомпілюватись, бо кількість рядків коду перевищила 65535...
Ну, покажіть тоді свій теперішній код https://replace.org.ua/post/133047/#p133047
нажаль то було на спектрумі і код не зберігся. Ба більше, він навіть не зміг скомпілюватись, бо кількість рядків коду перевищила 65535...
Ти що, наркоман що більш ніж 65535 рядків на спектрумі написав? Він же не скомпілюється!
Гадаю, ви сучасний могли б сказати собі тодішньому приблизно таке. Але чи допомогло б це вам тоді?
Мені дістало розуму, щоб зрозуміти, що трапилось. Взагалі на тому бейсіку важко було щось неадекватне написати. Тому малоімовірно, щоб я себе якось дуже різко з кимось порівняв
Ви ті всі 0xFFFF рядків коду руками набирали? 
Пане wladuslaw119, ще раз - вам потрібна блок-схема до цієї функції?
Для початку: блок-схеми були чимось корисним за часів неструктурного програмування. Зараз це лайно мамонта. Але, звісно, якщо викладач задав - то краще зробити. По-друге, блок-схеми слід складати до написання програми чи, в гіршому разі, під час. Блок-схема вже написаної програми - це безглуздя. По-третє, блок-схема - це загальне пояснення, як працює алгоритм, а не чіткий код; але, гадаю, раз ваш інформатик не в курсі того, для чого складаються блок-схеми, то він і вимоги свої ставить.
Підозрюю, що ви хотіли спитати (але чомусь не спитали), як малювати case. Зайдіть на вікі і гляньте на першій ілюстрації, як зображається множинний вибір (якщо, звісно, ваш викладач в курсі, що таке буває).
Також я, як і інші учасники форуму, маю купу зауважень до коду, але, гадаю, вам зараз важливіше здати цю дурню і, можливо, забути про неї. З такими завданнями я вас розумію.
ось такий ескіз
Я також не розумію, в чому саме полягає проблема, а на фотках не можу нічого розібрати. Все ж таки правильно сказав той мудрець, що правильно сформульоване питання - це уже половина відповіді.
Сторінки 1
Для відправлення відповіді ви повинні увійти або зареєструватися