Thầy dạy rất hay , rất dễ hiểu , thầy còn rất gần gũi với học sinh Em là học sinh lớp 10 chưa từng được học qua pascal trong chương trình trung học cơ sở nhưng sau khi xem video của thầy thì em đã nắm bắt được kiến thức rất nhanh Cảm ơn thầy !
Có 1 lỗi nhỏ là khi a+b=c thì ko hiện gì cả, mong thầy sửa uses Crt ; program x; var a,b,c:Real; begin clrscr(); write('nhập vào đây 3 cạnh của tam giác ABC'); readln(a,b,c); if ((aa+c)) then writeln('Đây không phải Tam giác') else if ((a=b) and (b=c)) then Write('đây là tam giác đều') else begin if (a = b) or (b = c) or (a = c) then begin if (((a*a) = (b*b)+(c*c)) or ((b*b)=(a*a)+(c*c)) or ((c*c)=(b*b)+(a*a))) then Write('Là Tam Giác Vuông Cân') ; Write('là tam giác cân' ); end else if (((a*a) = (b*b)+(c*c)) or ((b*b)=(a*a)+(c*c)) or ((c*c)=(b*b)+(a*a))) then writeln('là tam giác vuông'); end; ReadLn() end.
Ở giải Phương trình bật 2 thì lúc mà xét trường hợp thì có 3 TH đó là : D0 Dùng câu lệnh if ở 2 TH đầu Còn else ở cuối làm sao máy tính nó biết là D>0 , tại sao nó k tự sét >= , ,
@@Nam-wr2yu ko bt chỗ bạn như nào, chỗ mình thi vào 10 chuyên tin có 2 lựa chọn hoặc làm tin hoặc làm toán, nên tuỳ chỗ mà lựa chọn học tin hay toán để thi vào 10
Chào bạn. Chữ ln nghĩa là line, xuống dòng. Nếu bạn đọc dữ liệu từ file nên dùng read còn nếu từ bàn phím nên dùng readln. Dùng read khi đọc từ bàn phím nó sẽ làm trôi các câu readln có chấm phẩy ở phía sau.