viết chương trình nhập vào năm sinh, xuất ra màn hình số tuổi, mốc tính làm năm sinh của học sinh (Pascal)

1 câu trả lời

Program Tao_Xau_Ho_Ten;

Var HT, H, T :String;

VT,SL, i : Byte;

Begin

Write('Nhap Ho va Ten 1 nguoi :'); Readln(HT);

i:=1; SL:=0;

While HT[i]<>' ' do

Begin

SL:=SL+1;

i:=i+1;

End;

Câu hỏi trong lớp Xem thêm