WordPress, Shopify ir PHPFusion programuotojų bendruomenė

Parašė Mantuxs09· 2010 Rugs. 15 19:09:34

#67

program LyginisNelyginis;
var a, b : integer;
begin
writeln('1 skaicius:');
readln(a);
b := a mod 2;
if b=1 then writeln('Nelyginis')
else
writeln('Lyginis');
readln
end.

Kazkam reikejo. Mano variantas, nera pats geriausias (naudojami 2 kintamieji), bet manau vis geriau nei nieko