Question

Câu 1: nhập vào số nguyên a , kiểm tra xem số đó có lớn hơn 10 hay ko.biến đổi thành câu lệnh pascal

Answer 1

Help

 

 

Answer 2

uses crt;

var a,i:integer;

BEGIN

clrscr;

write('Nhap so nguyen a: ');

readln(a);

xl mình chỉ ms bt tới khúc này

 

Answer 3

uses crt;

var a:integer;

begin

clrscr;

readln(a);

if (a>10) then writeln('phai')

else writeln('ko phai');

readln;

end.