Viết chương trình Nhập số N, in ra chữ số đầu và cuối của N.
2 câu trả lời
program bai_giai;
uses crt;
var n:longint;s:string;
begin
clrscr;
write('n=');readln(n);
str(n,s);
writeln('chu so dau la:',s[1]);
write('chu so cuoi la:',s[length(s)]);
readln
end.
uses crt;
var n: string;
begin
clrscr;
readln(n);
writeln(n[1], ' ', n[length(n)]);
readln;
end.