Adamg1996 Opublikowano 14 Kwietnia 2010 Udostępnij Opublikowano 14 Kwietnia 2010 USES crt; VAR Ek,m,v:longint; BEGIN clrscr; writeln('Podaj mase (m) ciala'); readln(m); clrscr; writeln('Podaj predkosc (v) ciala'); readln(v); clrscr; Ek:=m*v*v/2; writeln('Energia kinetyczna danego ciala wynosi :',Ek,'J'); readln; END. Nie chce mi tego uruchomić/skompilować... dlaczego? Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
Makary155 Opublikowano 14 Kwietnia 2010 Udostępnij Opublikowano 14 Kwietnia 2010 Jakieś komunikaty kompilatora byśmy poprosili edit: moim zdaniem przyczyną jest puste readln, wg mnie lepiej użyć while not keypressed do; Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
Adamg1996 Opublikowano 14 Kwietnia 2010 Autor Udostępnij Opublikowano 14 Kwietnia 2010 FIZYKA.pas(13,10) Error: Incompatible types: got "Extended" expected "LongInt" FIZYKA.pas(17) Fatal: There were 1 errors compiling module, stopping FIZYKA.pas(0) Fatal: Compilation aborted Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
Marmot Opublikowano 14 Kwietnia 2010 Udostępnij Opublikowano 14 Kwietnia 2010 Przeczytaj błąd. Nawet ci zasugerowało coś. Teraz, wraz z sugestią kompilatora, zmień typ zmiennej Ek z longint na extended, ewentualnie real. Operacji dzielenia nie ma dla typów liczb całkowitych, chyba że zaokrąglisz wynik do części całkowitych przez round(), albo zamiast / użyjesz div, ale to będziesz mieć bardzo niedokładne wyniki w obu przypadkach. Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
Pieter Opublikowano 14 Kwietnia 2010 Udostępnij Opublikowano 14 Kwietnia 2010 Ek:=round((m*(v*v))/2); Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
Adamg1996 Opublikowano 15 Kwietnia 2010 Autor Udostępnij Opublikowano 15 Kwietnia 2010 Dzięki... :thumbsup: Odnośnik do komentarza Udostępnij na innych stronach Więcej opcji udostępniania...
Rekomendowane odpowiedzi