WordPress, Shopify ir PHPFusion programuotojų bendruomenė

Parašė s1Nk· 2010 Rugs. 15 20:09:57

#72

Pirma padariau pradedu galvot antra.

program daugyba_;
var a, b : integer;
begin
  WriteLn('Iveskite pirma skačiu');
  read(a);
  WriteLn('Iveskite antra skaičiu');
  read(b);
  writeLn(a*b);
  if a*b mod 2 = 0
  then writeLn ('taip')
  else
  writeLn('Ne');
  Readln;
  ReadLn;
end.