Học sinh giỏi Thạnh Mỹ Tây – Châu Phú – An Giang

This WordPress.com site is the cat’s pajamas

nguyễn huỳnh như.

Để lại bình luận

program tuoi;

uses crt;

const n=2012;

var ten: char;

    i:integer;

    sinh:integer;

begin

clrscr;

       write(‘Nhap ten’); readln (ten);

       write(‘nam sinh la’); readln (sinh);

 

       i:=n-sinh;

 

       writeln(‘tuoi la’,i);

 

if (i<1) then write(‘nhom tuoi so sinh’);

if (i>2)and (i<9) then write (‘nhom tuoi nhi dong’);

if (i>9)and(i<15) then write (‘nhom tuoi thieu nien’);

if (i>15)and(i<32) then write (‘nhom tuoi thanh thieu nien’);

if (i>33)and(i<50) then write (‘nhom tuoi trung nien’);

if i>50 then write (‘gia roi’);

readln

end.

Gửi phản hồi

Mời bạn điền thông tin vào ô dưới đây hoặc kích vào một biểu tượng để đăng nhập:

WordPress.com Logo

Bạn đang bình luận bằng tài khoản WordPress.com Log Out / Thay đổi )

Twitter picture

Bạn đang bình luận bằng tài khoản Twitter Log Out / Thay đổi )

Facebook photo

Bạn đang bình luận bằng tài khoản Facebook Log Out / Thay đổi )

Google+ photo

Bạn đang bình luận bằng tài khoản Google+ Log Out / Thay đổi )

Connecting to %s