Bài 6. Câu lệnh điều kiện
Các câu hỏi tương tự
Các bạn có thể tìm lỗi trong program này giúp tớ được không?
program CTT5;
uses crt;
var a,b : integer;
begin
writeln(Nhap so hang dau tien : );readln(a);
writeln(Nhap so hang thu hai : );readln(b);
if b0 then
writeln(Ket qua phep cong la : ,a+b);
writeln(Ket qua phap tru la : ,a-b);
writeln(Ket qua phep nhan la : ,a*b);
writeln(Khong the chia cho 0);
else
writeln(Ket qua phep cong la : ,a+b);
writeln(Ket qua phap tru la : ,a-b);
writeln(Ket qua phep nhan la : ,a*b);
writeln(Ket qua phep chia l...
Đọc tiếp
Các bạn có thể tìm lỗi trong program này giúp tớ được không?
program CTT5;
uses crt;
var a,b : integer;
begin
writeln('Nhap so hang dau tien : ');readln(a);
writeln('Nhap so hang thu hai : ');readln(b);
if b=0 then
writeln('Ket qua phep cong la : ',a+b);
writeln('Ket qua phap tru la : ',a-b);
writeln('Ket qua phep nhan la : ',a*b);
writeln('Khong the chia cho 0');
else
writeln('Ket qua phep cong la : ',a+b);
writeln('Ket qua phap tru la : ',a-b);
writeln('Ket qua phep nhan la : ',a*b);
writeln('Ket qua phep chia la : ',a div b);
readln;
end.
Nếu các cậu tìm được tớ sai lỗi nào thì comment cho tớ để tớ biết!
Cho a:= 7; b:= 3; Kết quả sau khi thực hiện câu lệnh dưới đây là: if a>b then writeln(‘a>b’) else writeln(‘a<b’);
A. a>b B. a=b C. a<b D. a≠b
28 tháng 12 2020 lúc 12:17
Câu hỏi: Em hãy tìm và sửa lỗi chương trình sau:
Program So sanh;
Uses crt;
Var m, n= integer;
Begin
if m > n then writeln(m lon hon n);
else if m < n writeln(m nho hon n);
else writeln('m bang n');
readln
End.
P/S: Bạn nào biết thì trả lời giúp mình với, đang cần gắp lắm ạ!
Cho biết kết quả của lệnh sau: if (a b) then writeln(a); else writeln(b);A. Viết ra màn hình số nhỏ nhất trong 2 số a và bB. Viết ra màn hình số lớn nhất trong 2 số a và bC. Câu lệnh sai nên không thực hiện đượcD. Đảo giá trị của hai biến a và b
Đọc tiếp
Cho biết kết quả của lệnh sau: if (a > b) then writeln(a); else writeln(b);
A. Viết ra màn hình số nhỏ nhất trong 2 số a và b
B. Viết ra màn hình số lớn nhất trong 2 số a và b
C. Câu lệnh sai nên không thực hiện được
D. Đảo giá trị của hai biến a và b
Các đoạn chương trình khác nhau chỗ nào?
1/ If Long > Trang then writeln('Long cao hon');
If Long < Trang then writeln('Trang cao hon') else writeln('Ca hai bang nhau');'
và
2/ If Long > Trang then writeln('Long cao hon') else If Long < Trang then writeln('Trang cao hon') else writeln('Ca hai bang nhau);
Giúp mình vớiiiii
Câu lệnh sau có bao nhiêu lỗi sai? Hãy chỉ ra các lỗi sai đó:
if a mod 2 :=0 then writeln(a,' la so chan);
else writln(a, ' la so le')
Bạn nào viết được giùm mình cái chương trình pascal này :CẢM ƠN NHIỀU
Nếu như mua100 nghìn thì giảm giá 30%
Nếu như mua100 nghìn thì giảm giá 15%
Có gợi ý:
Program:________________
uses __________
var T:real;
write(nhap so tien mua);readln(T);
if(T100000)then writeln(so tien phai tra la,(70*T)/100)
else_______________
readln
end.
Cần gấp !!!!!!!!!!!!!!!!
Đọc tiếp
Bạn nào viết được giùm mình cái chương trình pascal này :''CẢM ƠN NHIỀU''
Nếu như mua>100 nghìn thì giảm giá 30%
Nếu như mua<100 nghìn thì giảm giá 15%
Có gợi ý:
Program:________________
uses __________
var T:real;
write(''nhap so tien mua'');readln(T);
if(T>100000)then writeln('so tien phai tra la'',(70*T)/100)
else_______________
readln
end.
Cần gấp !!!!!!!!!!!!!!!!
Câu lệnh IF a<10 then b:=5 else b:= 7; , vậy khi a nhận giá trị 8 thì b nhận giá trị nào?
Các câu lệnh Pascal sau đây được viết đúng hay sai?
a) if x:=7 then a=b;
b) if x>5; then a:=b;
c) if x>5 then; a:=b;
d) if x>5 then a:=b; m:=n;
e) if x>5 then a:=b; else m:=n;
f) if n>0 then begin a:=0; m:=-1 end else c:=a;