Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Pascal]Wyrażenia


Rekomendowane odpowiedzi

Opublikowano

Witam. Mam takie zadanie:

 

Napisz program przeliczający jednostki długości:

 

a) cale na cm,

B) stopy na cm.

 

Przyjmij, że 1 cal = 2,54 cm, a 1 stopa = 30,48 cm.

Aby wykonać ćwiczenie powinieneś:

1) program pobierze od użytkownika długość w calach i stopach,

2) wpisać kod, skompilować program i poprawić ewentualne błędy, uruchomić program i przetestować,

3) wprowadzić właściwy typ danych,

4) format wyświetlania wyniku z dokładnością do setnej części,

5) nazwa pliku i identyfikator w nazwie programu Przelicznik,

6) po identyfikatorze programu wstaw komentarz: Twoje nazwisko,

7) program wypisze napis: Program pobiera długość w calach i stopach, i wyświetla przeliczone jednostkina centymetry,

 

Rozwiązanie podaj w postaci: listy kroków, schematu blokowego oraz kodu źródłowego.

 

Nie wiem co jest nie tak, mógłby ktoś poprawić ten program? Z góry dziękuję za pomoc.

 

Oto mój kod:

 

program Proporcja;

var A, B;
Wynik:real;
Wynik2:real;

begin
WriteLn('Podaj cale');
ReadLn(A);
WriteLn('Podaj stopy');
ReadLn(;
C = 2.54;
D = 30.48;
Wynik:=A*C;
Wynik2:=B*D;

WriteLn('Wynik');
WriteLn(A:0:2,' - ' ,Wynik:0:2);
WriteLn(B:0:2,' - ' ,Wynik2:0:2);
ReadLn;
end.

Opublikowano

Nie znam pascala. Można w Javascript/Java/Android-Java/Php/Bukkit-Java??? Jak tak, to podaj mi którym i zrobie :D

  • 2 tygodnie później...
Opublikowano

program Proporcja;

 

var

A,B,C,D:real

Wynik:real;

Wynik2:real;

 

begin

WriteLn('Podaj cale');

ReadLn(A);

WriteLn('Podaj stopy');

ReadLn(B);

C:=2.54;

D:=30.48;

Wynik:=A*C;

Wynik2:=B*D;

 

WriteLn('Wynik');

WriteLn(A:0:2,' - ' ,Wynik:0:2);

WriteLn(B:0:2,' - ' ,Wynik2:0:2);

ReadLn;

end.

 

pogrubione rzeczy masz poprawione.

Na poczatku nie masz zadeklarowanych zmiennych C i D, a zmienne A i B masz zle zadeklarowane.

Chociaz w sumie mozna to zrobic jeszcze ladniej i napisac

A,B,C,D,Wynik,wynik2:real;

W drugim pogrubionym miejscu nie masz operatora przypisania, tylko porównania.

I masz zbyt wiele spacji. Poprawiony kod kompilowal sie w lazarusie jbc.

Mam nadzieje, ze Ci zdarzyłem pomoc.

4166086824bcdebc547729.png

 

Jesli pomogłem, daj 'Lubię to!'.

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...