Tema sukurta: 2011.06.05 02:23
2011.06.05 02:23 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


MidNight
MidNight
Pradedantysis
Sveiki gavau uzduoti reikia is triju ivestu kintamuju isskirti viena vidurinyji .. Tik beda kad niekaip nesugalvoju kaip tai butu imanoma padaryti . Jai kas galit padekit nes jau ne viena val galva suku..
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 02:26 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


MidNight
MidNight
Pradedantysis
Ta prasme ivedu pvz A=55 B=50 C=60 ir kad atsakymas 55 butu..
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 06:04 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Edijus
Edijus
Pažengęs
Ežio sąskaitą man už 5lt papildai ir padarau.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 07:12 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Edijus
Edijus
Pažengęs
Tiesą sakant jau padariau. Darbą gali rasti šiuo adresu. Gali atidaryti exe irr patirinti veikimą. Už paswordą teks pakloti 5lt. Slaptažodis ilgas (skaičiai, raidės simboliai), todėl jo kitaip gauti nepavyks.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 07:13 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Edijus
Edijus
Pažengęs
https://sites.google.com/site/thricesoftas/Home/darbai/Vidurinysis%5BPascal%5D.zip?attredirects=0&d=1
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 08:12 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


rudagazele
rudagazele
Pažengęs
Edijau, nedraugiškas esi.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 08:38 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Edijus
Edijus
Pažengęs
Aš iš to gyvenu. Būsiu draugiškas - būsiu nevalgęs.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 09:22 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Sheila
Sheila
Didmeistris
rudagazele rašė:

Edijau, nedraugiškas esi.


ačiū ir mano vaikai nevalgo :) viskas normaliai čia :)
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 22:38 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Blussa
Blussa
Didmeistris
Jazau, iki ko dagyvenom! Ką čia programint? Su paprasčiausiu Exceliu per 5 minutes, kokiais 3-m būdais galima

O šiaip, 100% suprantu Edijų. Juk nemanote, kad mechanikas, kuris jums remontuos, sakykim, dviratį - tai darys už ačiū.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.05 22:48 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Edijus
Edijus
Pažengęs
Aš mašiną į servisą nuvežiau, plaktuku vienoje vietoje kalkštelėjo ir 100Lt paėmė. Pasakiau, kodėl tiek daug, atsakė, kad 1lt už kalkštelėjimą ir 99lt už žinojimą kur kalkštelti. Tai manau, kad 5lt už viduriniojo skaičiaus radimą menki pinigai.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.11 12:42 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Staff
Staff
Pažengęs
Program maksimumas;

uses
crt;

var n,i,max: integer;
sk: array[1..255] of Integer;
begin
ClrScr;
WriteLn('Ivesite kiek bus skaiciu (n)');
ReadLn(n);
for i:=1 to n do
begin
ReadLn(sk);
end;

max:=sk[1];

for i:=1 to n do
begin
if sk > max then max:=sk;
end;

Write('Rezultatas: '); Write(max);

readln
end.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.11 13:21 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Edijus
Edijus
Pažengęs
Čia tik maksimumo radimas. Dar ir minimumą reikia rasti ir likęs skaičius būtų vidurinysis.
Cituoti
Atsakyti
Registruokis ir diskutuok!
2011.06.11 14:21 Nauja žinutė
Vartotoajs neprisijungęs Peržiūrėti anketą


Staff
Staff
Pažengęs
idėja kaip daryt jau yra ir žmogus jau sugebės pabaigti
Cituoti
Atsakyti
Registruokis ir diskutuok!
© 2006 – 2024 Forumas "Draugas.lt"  |  Privatumo politika  |  Naudojimosi taisyklės  |  Reklama  |  Kontaktai