Làm nhanh giúp mình ạ. Vết chtr làm việc: Cv1:in dòng chữ ‘ mời nhập số’ Cv2: nhập 1 số thực cho biến a. Với số lần là 10 lần

0 bình luận về “Làm nhanh giúp mình ạ. Vết chtr làm việc: Cv1:in dòng chữ ‘ mời nhập số’ Cv2: nhập 1 số thực cho biến a. Với số lần là 10 lần”

1. program nhap10lan;

   uses crt;

   var i:byte;

         a:real;

   begin

   clrscr;

   for i:=1 to 10 do

    begin

     write(‘Moi nhap so: ‘);

     readln(a);

    end;

   readln

   end.

   Bình luận

2. Không hiểu đề lắm, nhưng có vẻ đây là câu trả lời.

   Uses crt;

   Var i:integer;a:real;

   Begin

   For i:=1 to 10 do begin

   Write(‘moi ban nhap’);readln(a);end;

   Readln

   End.

   Bình luận