Question

Giúp mik với ạ

Answer 1

giúp với

Answer 2

ử có nhầm không bạn đây là toán mà

có phải tin học đâu

Answer 3

uses crt;

var a:integer;

begin

clrscr;

readln(a);

if a mod 2=0 then write('La so chan')

else write('La so le');

readln;

end.