Question

[Eriken]

Hôm nay là ngày đầu tuần , như thường lệ ta sẽ làm event tiếp

Câu hỏi như sau :

C1 : Viết chương trình tính tuổi của bạn Nam biết bạn Nam sinh năm 2003 . Hãy kiểm tra xem bạn Nam có đang ở trong tuổi vị thành niên hay không ( Tổ chức Y tế thế giới quy định là tuổi từ 10 - 19 tuổi là vị thành niên)

C2 : Viết chương trình tìm abc biết \(abc=a^3+b^3+c^3+3abc\) . Với abc là số nguyên

C3 : Viết chương trình tính tổng bằng cách sử dụng vòng lặp while..do . A=1+2+3+4+...+n với n là số nguyên dương được nhập từ bàn phím

Phần thưởng sẽ được trao với mỗi câu là 1GP . Tùy trường hợp các bạn trình bày tốt sẽ được tặng thêm 1GP

Answer 1

[Nguyen]

C1:

Var

a:integer;b: integer;

Begin

a:=0;

Writeln('Hay nhap nam can tinh:');

readln(b);

a:=b-2003;

if a>9 and a<20 then

writeln('Nam dang o trong tuoi vi thanh nien.')

else

writeln('Nam khong o trong tuoi vi thanh nien.');

readln;

end.

Answer 2

[Luân Đào]

1.

program c1;

uses crt;

const namnay=2019;

namsinh=2003;

var tuoi:integer;

begin

clrscr;

tuoi:=namnay-namsinh;

if 10<=tuoi and 19>=tuoi then write('Nam o tuoi vi thanh nien ') else write('Nam khong o tuoi vi thanh nien');

readln

end.