AKTUALNIE - Wiejska Kuchnia Mojej Mamy
Temat: Parytety - napęd czy hamulec demokracji?
Dla mnie bez sensu.
Powiedzmy ze chcialabym dostac sie dajmy na to do jakiejs rady,kandydatow jest wielu,wiekszosc to faceci.Dostaje sie bo były 4 miejsca z czego 2 musza zajac kobiety.Potem słysze ze ludzie zagłosowali na mnie mimo iz moj program/praca był/a gorszy/a niz innych facetow,no ale w koncu trzeba było wybrac jakas kobiete.
Jestem kobietą,ale chce dostawac prace/wygrywac nagrode/brac w czyms udział,bo jestem lepsza od innych,lepiej sobie radze,mam do tego wieksze predyspozycje,a nie dlatego ze ktos uwaza ze powinno byc rowno kobiet i meżczyzn.
Jak dla mnie kobiety pokazuja tymi ustawami ze sa słabsze-potrzebuja jakis bzdur,ustaw zeby cos zdobyc,gdzies sie...
Źródło: antyforum.pl/viewtopic.php?t=5654
Temat: [Pascal]Praca
...Wygenerować macierz liczb rzeczywistych.
Wymiar macierzy podaje użytkownik.
Jeżeli wygenerowana macierz jest kwadratowa to należy wyznaczyć średnią głównej przekątnej. W przeciwnym wypadku proszę określić w ilu wierszach wszystkie składniki są większe od 3.
Na razie napisałem tyle i nie wiem tylko jak określić w ilu wierszach wszystkie składniki są większe od 3. Jeśli ktoś mógłby mi pomóc byłbym bardzo wdzięczny. :D program praca;
const
k=20;
l=20;
var
a: array[1..k,1..l] of real;
i,j,n,m,ile: integer;
s: real;
srednia: real;
licz: real;
procedure generuj;
begin
writeln('Podaj wymiar macierzy');
writeln('Podaj liczbe wierszy - n');
readln(n);
writeln('Podaj liczbe kolumn - m');
readln(m);
if (n<=k) and (m<=l) and (n>=1) and (m>=1) then
begin
randomize;
for i:=1 to n do
for j:=1 to m do
a[i,j]:=...
Źródło: forum.pclab.pl/index.php?showtopic=464641
zanotowane.pldoc.pisz.plpdf.pisz.plszopcia.htw.pl
.
|
