Potrzebuje napisać program w języku pascal, który z podanych przez użytkownika punktów w pętli for policzy różnice między współrzędnymi x i oddzielnie y. Obliczenia mają być uniwersalne czyli jedno ogólne równanie w pętli.
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 animacja;
uses crt;
procedure pierwsza;
var zmiana:integer;
begin
for okno:=0 to 5 do
begin
clrscr;
window (37+ okno, okno,38+ okno, okno);
write ('x');
delay (100);
end;
end;
procedure druga;
var zmiana:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (42- okno,5+ okno,43- okno,5+ okno);
write ('x');
delay (100);
end;
end;
procedure trzecia;
var okno:integer;
begin
for okno:=1 to 5 do
begin
R E K L A M A czytaj dalej ↓clrscr;
window (37+ okno,10+ okno,38+ okno,10+ okno);
write ('x');
delay (100);
end;
end;
procedure czwarta;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (42- okno,15+ okno,43- okno,15+ okno);
write ('x');
delay (100);
end;
end;
procedure piata;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (37+ okno,20+ okno,38+ okno,20+ okno);
write ('x');
delay (100);
end;
end;
procedure pierwszab;
var okno:integer;
begin
for okno:=0 to 5 do
begin
clrscr;
window (15+okno,okno,16+okno,okno);
write ('x');
delay (100);
end;
end;
procedure drugab;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (20-okno,5+okno,21-okno,5+okno);
write ('x');
delay (100);
end;
end;
procedure trzeciab;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (15+okno,10+okno,16+okno,10+okno);
write ('x');
delay (100);
end;
end;
procedure czwartab;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (20-okno,15+okno,21-okno,15+okno);
write ('x');
delay (100);
end;
end;
procedure piatab;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (15+okno,20+okno,16+okno,20+okno);
write ('x');
delay (100);
end;
end;
procedure pierwszac;
var okno:integer;
begin
for okno:=0 to 5 do
begin
clrscr;
window (67+okno,okno,68+okno,okno);
write ('x');
delay (100);
end;
end;
procedure drugac;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (72-okno,5+okno,73-okno,5+okno);
write ('x');
delay (100);
end;
end;
procedure trzeciac;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (67+okno,10+okno,68+okno,10+okno);
write ('x');
delay (100);
end;
end;
procedure czwartac;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (72-okno,15+okno,73-okno,15+okno);
write ('x');
delay (100);
end;
end;
procedure piatac;
var okno:integer;
begin
for okno:=1 to 5 do
begin
clrscr;
window (67+okno,20+okno,68+okno,20+okno);
write ('x');
delay (100);
end;
end;
begin
repeat
pierwsza; druga; trzecia; czwarta; piata;
pierwszab; drugab; trzeciab; czwartab; piatab;
pierwszac; drugac; trzeciac; czwartac; piatac;
until keypressed;
end.
Polecamy prace o podobnej tematyce Przykładowy zestaw krótkich programów w języku C pod Linuxem. Charakterystyka programów graficznych Metody dystrybucji programów komputerowych Publikacje sporządzane w programie Publisher 2003 Zmienne tablicowe w języku C++ Polecamy na dziś Microsoft Word – skróty klawiszowe Budowa wewnętrzna komputera Informacja – definicja, rozwój, możliwości. Rekurencja i iteracja, różnice i podobieństwa Rodzaje oprogramowania (ze względu na pełnione funkcje) Zalety i wady poczty elektronicznej. Urządzenia peryferyjne komputera Linux – powstanie i charakterystyka Skróty klawiszowe Podział oprogramowanie ze względu na jego przeznaczenie.