Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  1
Language: BASIC
Code:
program chislo;
var a : integer;
begin;
writeln ('Введите целое число');
read (a);
if a mod 2=0 then writeln ('Число является четным');
else writeln ('Число не является четным');
end.
Comments: