Đề 6 : Viết chương trình nhập giá trị cho 3 số nguyên dương a,b,c và kiểm tra xem chúng có phải là độ dài ba cạnh của một tam giác hay không ? ( đưa ra thông báo )
Help me mai mình kiểm tra thực hành rồi giúp mình với nha everybody -.- !!
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Tìm và sửa các lỗi sau:
Uses ; crt ;
Var x:real; y:integer;
Begin
X:=10;
Y:=5/2
y=x+y
Write('Y=' Y);
Uses crt;
Var x: real; y: Integer;
Begin
x:= 10;
y:= 5/2;
y:= x+y;
Write('Y=',Y);
Bài này bạn làm sai nhiều lắm, k có End. r mấy câu gán x và y bị lặp nhau nói chung là bài làm này chưa đúng. Nếu k hiểu thì bạn đặt câu hỏi ra luôn r mình giải hộ cho. Chúc bạn học tốt !
lỗi thứ 1:
uses ; crt ; ➝ uses crt;
lỗi thứ 2:
bạn đã khai báo y là số nguyên thì không thể thực hiện được phép chia 5/2 được nên phải khai báo y là số thực( mình chỉ giải thích thêm thôi)
nên sửa lại:
var x,y;real; hay Var x:real; y:real;
và thêm dấu chấm phẩy vào sau y:=5/2
lỗi thứ 3
phải thêm dấu hai chấm và dáu chấm phẩy vào y:=x+y;
nếu bạn để trùng cũng được bởi vì pascal chạy tuần tự từng câu lệnh
lỗi thứ 4:
thêm end vào cuối bài nữa nhé (nếu bạn muốn xem chương trình thì thêm readln trên end nhé)
nếu thiếu bỏ qua cho mình nhé
program shdfj; ( đặt tên nào cũng được)
uses crt;
var n,i:integer;
begin
clrscr;
write('n=');
readln(n);
for i:=1 to n do if (n mod i) = 0 then write(i);
readln;
end
bạn làm thử đi được đó
nếu sai thì thông cảm cho mình nhé
Địa chỉ khối là địa chỉ của ô trên cùng bên phải và ô dưới cùng bên trái được ngăn cách bởi dấu :
Bảng tính là vùng để nhập dữ liệu còn trang tính là bao gồm bảng tính, thanh công thức, các dải lệnh DATA và FORMULAS,...
Muốn tính diện tích Việt Nam
Ba Lan, Tiệp Khắc ta mang cộng vào
Rồi đem nhân với nước Lào
Chia cho Mông Cổ thế nào cũng ra
hay
Muốn tính diện tích Việt Nam
Ta đem Trung Quốc, Thái Lan cộng vào
Cộng rồi nhân với nước Lào
Campuchia phát thế nào cũng ra
Lời giải :
program hotrotinhoc ;
var a,b,c : integer ;
begin
write('nhap gia tri a'); readln(a);
write('nhap gia tri b'); readln(b);
write('nhap gia tri c'); readln(c);
If (a+b>c) or (a+c>b) or (b+c>a) then write('Chung la ba canh cua tam giac') else write('Chung khong phai la ba canh cua tam giac');
readln
end.