khai báo var a:longint;

program chanle;

uses crt;

var

begin

clrscr;

wrte('Nhap mot so bat ki ')readln(a);

i a mod 2 =0 then writeln(a,' la so chan)

else writeln('a,' la so le');

readln

end.

program bai12;

uses crt;

var

begin

clrcr;

write('Nhap mot so N= ');readln(n);

if n>10 then writeln(n,'>10');

if n<10 then writeln(n,'<10');

readln

end.

một lần nữa cảm ơn các bạn đã giúp

350:a dư 14 suy ra 350-14 chia hết cho a hay 336 chia hết cho a(1)

220:a dư 10 suy ra 220-10 chia hết cho a hay 210 chia hết cho a(2)

Từ (1) vs (2) suy ra 336 chia hết cho a;210 chia hết cho a

Suy ra a thuộcƯC(336;210),mà a lớn nhất suy ra a thuộc ƯCLN(336;210)

Ta có:336=2^4 nhân 3 nhân 7

          210=2 nhân 3 nhân 5 nhân 7

 Suy ra ƯCLN(336;210)=2 nhân 3 nhân 7=42

           Vậy a=42       

Bị ngáo à bạn...

ĐÃ LÀ NGUYÊN TỐ CÙNG NHAU THÌ ĐƯƠNG NHIÊN ƯỚC CHUNG LỚN NHẤT CỦA CHÚNG LÀ 1 RỒI CÒN GÌ NỮA

program bai1;

uses crt;

var a,b,t,Vtb,dds:real;

begin

write('Nhap chieu rong san ');readln(a);

write('Nhap chieu dai san ');readln(b);

write('Nhap thoi gian chay ');readln(t);

dds:=(a+b)*2;

writeln('Do dai san chay la ',dds);

Vtb:=dds/t;

writeln('Van toc trung binh cua ban do la: ',Vtb:10:2);

readln

end.

Thông tin bạn Ân thì bạn tự thêm vào nhé...