Viết phương trình a, Nhập vào từ bàn phím 2 xâu a,b(chứa các chữ thường) và thông báo ra màn hình tổng độ dài 2 xâu. b, tạo xâu c gồm các chữ cái từ

0 bình luận về “Viết phương trình a, Nhập vào từ bàn phím 2 xâu a,b(chứa các chữ thường) và thông báo ra màn hình tổng độ dài 2 xâu. b, tạo xâu c gồm các chữ cái từ”

1. uses crt;

   var a,b,c: string;

   begin

   clrscr;

   write (‘nhap xau a: ‘);   readln (a);

   write (‘nhap xau b: ‘);   readln (b);

   writeln (‘do dai xau A: ‘,length(a));

   writeln (‘do dai xau B: ‘,length(b));

   c:=a+b;

   writeln (‘xau C la: ‘,c);

   readln;

   end.

   Bình luận

2. uses crt;
   var a,b,c: string;
   begin
   clrscr;
   write (‘A= ‘);   readln (a);
   write (‘B= ‘);   readln (b);

   c:=a+b;

   writeln (‘Xau A dai: ‘,length(a));
   writeln (‘Xau B dai: ‘,length(b));
   writeln (‘C=: ‘,c);
   readln;
   end.

   Bình luận