Nhờ sửa lỗi chương trình pascal

#1 
Program TuHoc;
 uses crt;
 var 
   Bien:real;
   ketqua1:real;
   ketqua2:real;
   begin
   clrscr;
    Writeln('Nhap gia tri cua bien ');
    ketqua1:=Bien*Bien;
    ketqua2:=Bien*4;
    Writeln('do la = ',ketqua1);
    Writeln(' do la =',ketqua2);
    Readln;
   End.
#2

dữ liệu cho Bien đã được nhập vào gì đâu sao chạy :smile:
à mà post code thì coi hướng dẫn diễn đàn để post code lên sao cho dễ đọc nhé :blush:

1 Like
#3

ko phải bạn ơi vì sai chỗ đó là vì nó yêu cầu giá trị của kết quả hay sao ấy\

#4

sai rồi vì chưa có lệnh đọc readln(Bien); 100% viết được

#5

thì không có lệnh Read(Bien) nên Bien không có giá trị gì nên không chạy được :smile:

83% thành viên diễn đàn không hỏi bài tập, còn bạn thì sao?