Cho mình hỏi là tại sao CT này ko chạy đc ạ
program cannang;
uses crt;
var a,b,c,d,a1,b1,c1,d1,max,min:real;
begin
clrscr;
writeln(‘nhap ten 4 ban:’);readln(a,b,c,d);
writeln(‘nhap can nang ban’,a);readln(a1);
max:=a1;
min:=a1;
writeln(‘nhap can nang ban’,b);readln(b1);
if b1>max then max:=b1
else if b1max then max:=c1
else if c1max then max:=d1
else if d1 { "@context": "https://schema.org", "@type": "QAPage", "mainEntity": { "@type": "Question", "name": " Cho mình hỏi là tại sao CT này ko chạy đc ạ program cannang; uses crt; var a,b,c,d,a1,b1,c1,d1,max,min:real; begin clrscr; writeln('nhap ten 4 ban:');", "text": "Cho mình hỏi là tại sao CT này ko chạy đc ạ program cannang; uses crt; var a,b,c,d,a1,b1,c1,d1,max,min:real; begin clrscr; writeln('nhap ten 4 ban:');readln(a,b,c,d); writeln('nhap can nang ban',a);readln(a1); max:=a1; min:=a1; writeln('nhap can nang ban',b);readln(b1); if b1>max then max:=b1 else if b1 max then max:=c1 else if c1 max then max:=d1 else if d1
Đáp án:
Theo mk nghĩ thì ở chỗ khai báo biến là string chứ ko phải real. Nhưng vì mk ko giỏi tin lắm nên nếu sai thì bạn cho mk xl nha.
Giải thích các bước giải:
chỗ câu lệnh nhập tên 4 bạn phải là dùng string nha bạn vì đây là xâu không phải số thực