Tin học Nhập họ tên của một học sinh.in lên màn hình phần họ và phần tên. Vd input: Nguyen Van Sang Output: Phan ho: Nguyen 20/07/2021 By Audrey Nhập họ tên của một học sinh.in lên màn hình phần họ và phần tên. Vd input: Nguyen Van Sang Output: Phan ho: Nguyen Phan ten: Sang
var stri: string; i: byte;begin write(‘Nhap ho va ten hoc sinh: ‘); readln(stri); writeln(‘Phan ho: ‘,copy(stri,1,pos(‘ ‘,stri))); for i:=length(stri) downto pos(‘ ‘,stri) do if stri[i]=’ ‘ then begin writeln(‘Phan ten: ‘,copy(stri,i+1,length(stri))); break; end; readlnend. Trả lời