Witam!
Dostałem od nauczyciela zadanie, w którym muszę wykonać program do obliczania pola trójkąta
na razie wykonałem to, co jest w linku poniżej
Proszę o szybką pomoc/poradę co trzeba zmienić, aby działało
Dlaczego zgadujesz, jak wygląda składnia, zamiast wziąć w rękę jakiś poradnik do postaw Object Pascala?
"Proszę o szybką pomoc/poradę co trzeba zmienić, aby działało"
trzeba zmienić niemal wszystko i zacząć od nauki podstaw Pascala
masz zly wzor na pole trojkata
Znalazłem jakieś dwa mini poradniki do Pascala. Poczytaj sobie chwile jak wygląda dokument w pascalu, jak deklaruje się zmiennie, jak przypisuje się wartości do zmiennych. Po tym rozjaśni Ci się to co źle robisz.
- http://pascal.kurs-programowania.pl/turbo_pascal,podstawy_pascala.html
- https://main.edu.pl/en/user.phtml?op=show&page=pascal&c=40000
Jak nie lubisz czytać to są filmiki na youtube z podstawami do pascala. Powodzenia :)
jeśli już to tak :
procedure TForm1.Editchange(sender:Tobject);
var
a,b,p:double;
begin
a:=strtofloat(edit1.text);
b:=strtofloat(edit2.text);
p:=a*b/2;
label7.caption:=floattostr(p);
end;
to tak w uproszczeniu, bo jeśli edit1.txt albo edit2.txt nie będą znakowym zapisem liczby to dostaniesz wyjątek
jakby nie patrzeć to zanim zrobisz nawet najprostszy program musisz nauczyć się podstaw Pascala
Do walidacji poprawności podanej liczby można użyć TryStrToFloat
, coby uniknąć wyjątków. Ewentualnie można skorzystać z komponentu TFloatSpinEdit
, aby nie martwić się konwersją. Ale to i tak nie ma większego sensu, skoro pytacz kompletnie nie zna składni języka, już nie mówiąc o obiektowym paradygmacie.