Psst.. new poll here.
Psst.. new forums here.
Microsoft is blocking us again (TY IP Reputation!) so just use oauth login instead. :)
Paste
Pasted by R.I.G. ( 16 years ago )
var a,b:integer;
begin
readln(a,b);
a:=a mod 2;
if a>0 then b:=b mod 2;
if b>0 then writeln('четных чисел нет')
else writeln ('четное число есть ')
end.
{
}
Revise this Paste