Matematyka.pl

błąd pierwszy wyskakuje komenda "typed files cannot contain reference-counted types
"
i w programie głównym
przy zapisz(plik,x); {plik does not seem to be initialized}
a następnie przy end.

problem zadeklarowaniem pliku z rekordu program
program zad3;
uses crt;

type
rekord = record
imie : string;
nazwisko : string;
wiek : byte;
end;
r=file of rekord; {wyskakuje błąd}
var
plik:r;
x : integer;
naz : string;

procedure zapisz(var p:r; a : integer);
var
b : rekord;
i : integer ...

problem tkwi w tym że nie wiem jak wyswietlić wylosowane liczby przez komputer ,
program loto;
const
ileLiczb= 6;
maxLiczba=49;
type
liczba=1..maxliczba;
tZaklad=array[1..ileLiczb] of liczba;

procedure pobranieLiczb(var z:tZaklad);
var i:integer;
begin
writeln('podaj 6 cyfr');
for i:=1 to ...

problem z wariancją w pascalu
program wariarncja;
uses crt;
function silnia (n:integer):integer;
begin
writeln('podaj n');
readln(n);
if (n=0) or (n=1) then
silnia:=1
else silnia:= silnia(n-1)*n;
end;
function silniam (k,n,z:integer):integer;
begin
writeln ('podaj k');
readln(k);
z:=n-k;
silniam ...

\(\displaystyle{ \ln ^{2}x \cdot e^{\frac{1}{x}}= \left( \ln ^{2}x \right) ' \cdot e^{\frac{1}{x}}+\ln ^{2}x \cdot \left( e^{\frac{1}{x}} \right) '}\) nie wiem jak obliczyć pochodną \(\displaystyle{ \ln ^{2}x}\)

czyli to będzie równało się 2

nadal nie wiem jak to obliczyć

jak zrobić aby tekst w tej samej komórce został przeniesiony na dół ponieważ w accesie nie chce działąć enter

jak to mam zapisać cały program ponieważ się po gubiłem

mam napisać program który zlicza ile "a" i"A" jest w tekście program leci tak
program zad9;
uses crt;
type
ciag=array[1..70] of char;
var
a:ciag;
i,l,p:integer;
begin
writeln ('program oblicza ile jest w tekscie a');
p:=0;
l:=0;
repeat
read (a );
if a ='a' then
l:=l+1;
if a ='A' then
p:=p+1;
until a ...

popraw program dany jest n elementowy ciąg liczb całkowitych napisz program który wyznacza liczbę elementów ujemnych(czyli ile jest ujemnych cyfr w ciągu) i drukuje elementy ciągu w odwrotnej kolejności
program zad;
uses crt;
type
ciag= array[1..30];
var
a:ciag;
n,i,l:integer;
begin
write ('n ...

napisz pro gram który wczytuje dwie liczby całkowite x,y a następnie drukuje znak plus w pukcie x,y
z użyciem go to x,y (x,y)

problem zrobieniem programu w [eli 2.1] który ma wskazywać odchylenie standardowe \(\displaystyle{ \sigma = \frac{\sqrt{\sum_{i=0}^n(x_i-\overline{x})^2}}{n}}\) potrzebny jest jak go zrobić najlepiej dokładnie pokazany i opisany jeśli nie to chociaż w schematach blokowych z użyciem taśmy