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
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.
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.