Napisz program w turbo pascalu który obliczy obwód prostokąta podzielone przez π jeżeli wczytamy literę t . proszę o pomoc
Recommend Questions
mkaminski185
October 2020 | 0 Replies
1. Jakie zagadnienia (trzy elementy) obejmuje technologia informacyjna?2. Jakie elementy znajdują się na płycie głównej komputera – opisz krótko ich funkcje:• procesor:• pamięć RAM:• chipset:• karty rozszerzeń lub kontrolery zintegrowane z płytą główną:• pamięć ROM:3. Jakie urządzenia, obok płyty głównej, mogą znajdować się wewnątrz obudowy komputera?4. Wymień urządzenia zewnętrzne (peryferyjne).5. Co to jest system operacyjny i jak nazywają się najpopularniejsze systemy operacyjne?6. Opisz system plików w systemie Windows.7. Jakie to pliki (formaty plików):• *.exe:• *.pdf:• *.txt:• *.doc:• *.xls:• *.jpg:• *.png:• *.doc:• *.mp3:• *.mp4:
laurasleczka2009
October 2020 | 0 Replies
Ważne. Posłuchajcie mam problem zawsze jak włączam firefox to włącza mi się ta sama strona. Czyli ( Dajmy na to że pisze sobie coś na wordzie i chce poszukąć coś w firefoxie no go odpalam i patrze pierwsza strona jaka mi się otworzy to yt) I nie wiem czego tak się dzieje proszę pomocy.
laurasleczka2009
October 2020 | 0 Replies
Ważne. Posłuchajcie mam problem zawsze jak włączam firefox to włącza mi się ta sama strona. Czyli ( Dajmy na to że pisze sobie coś na wordzie i chce poszukąć coś w firefoxie no go odpalam i patrze pierwsza strona jaka mi się otworzy to yt) I nie wiem czego tak się dzieje proszę pomocy.
Program obwod_prostokata;
uses CRT;
var a,b,d:integer;
p:char;
begin
clrscr;
writeln('Aby policzyć obwód prostokąta wciśnij T. Jeśli chcesz wyjść wciśnij N');
readln(p);
if (p='T') or (p='t') then
begin
writeln('Podaj długość 1 boku');
readln(a);
writeln('Podaj długość 2 boku');
readln(b);
d:=a+a+b+b;
writeln('Obwód prostokata o bokach ',a,' i ',b,' podzielone przez Pi wynosi ',d/Pi:4:2);
writeln('Wciśnij enter aby zamknąć program');
readln;
end
else begin writeln('Wciśnij enter aby zamknąć program');
readln;
end;
End.