Parašė ozzWANTED· 2008 Vas. 14 18:02:44
#352
MAnjack parašė:
Reikia informatikai programą parašyt, o aš nebuvau pratoj pamokoj tai bišky neparišu kaip čia turėtų būt, va užduotis:
Sudaryti programą, kuri apskaičiuotų kiek duotame sveikame skaičiuje yra lyginių skaitmenų ir juos pateikti ekrane.
Gal kas galit parašyt arba bent paaiškint :D
Prašom:
program pvz1;
var n,sk,suma : longint;
begin
writeln('įvesk skaičių');
readln(n)
sk := n;
write('Tinkami skaičiai')
while a>0 do
begin
skaičius := a mod 10;
if(sk mod 2 = 0)
then begin
suma := suma+1;
write(sk, ' ');
end;
a := a div 10;
end;
Writeln('Lyginių skaičių: ', suma');
readln;
end.
Parašiau ant greitųjų, gali būti kur kokia smulki klaidelė, bet išsitaisysi.
mXt parašė:
Gal ir neblogas tas telefonas, bet vietos jame mazai :[
Ką tu dar pasakysi 160MB tikrai per akis, man rodos net ir N95 ne 8GB modelyje yra mažiau. O šiaip - va už 80Lt nusipirkau 4GB microSD kortą ir sėdžiu pilnai ja patenkintas, be to yra ir 8GB microSD už 169Lt, o metų pabaigoje ir 16GB pasirodo. Bet N95 yra žymiai prastesnis už G800 bent jau fotokameros kokybės. N95 jau tikrai senas telefas - išleistas dar 2006'aisias, ir tuomet buvo overprice'intas.
Redagavo ozzWANTED· 2008 Vas. 14 18:02:04