Cau 14: x=6; y=3
Cau 13: a=2; b=1
Cau 12:
Input: x
Output: Nghiệm của pt x+3+20=0
Viết chương trình nếu a,b >0 thì tính và in ra màn hình tích của a,b ngược lại hiển thị yêu cầu nhập lại
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
if (a>0) and (b>0) then writeln(a*b)
else writeln('Nhap lai');
readln;
end.
trong pascal, nêu lệnh điều kiện được sử dụng khi nào, nêu cấu trúc của câu lệnh điều kiện dạng đầy đủ và cách thực hiện câu lệnh
giúp mình với ạaaaaa
viết chương trình từ bàn phím hai số nguyên x,y (x>y), kiểm tra và thông báo ra màn hình x chia hết cho y hay không.
cần gấp!!
viết chương trình pascal tính tổng 10 số tự nhiên đầu tiên nhập từ bàn phím ( viết bằng thuật toán bài 6)
giúp mik lẹ vs ạ mai mik thi
Giả sử cần viết chương trình nhập một số tự nhiên vào máy tính và in ra màn hình kết quả số đã nhập có phải là số lẻ, chẳng hạn “5 là số lẻ”, “6 không phải là số lẻ". Hãy mô tả các bước của thuật toán để giải quyết bài toán trên
Bước 1: Nhập số n (n là số tự nhiên)
Bước 2: Xét số dư khi chia n cho 2
Bước 3: Nếu số dư là 1 thì ghi ra màn hình n là số lẻ, ngược lại thì ghi ra màn hình n không là số lẻ
Bước 4: Kết thúc
Viết chương trình kiểm tra một số nguyên a có phải là số chia hết cho 5 không. Nếu chia hết in ra "CO", ngược lại in ra "KHONG". Biến a được nhập từ bàn phím:
Cíu mình với :(
Viết chương trình nhập từ bàn phím 3cạnh của một tam giác. Kiểm tra xem đó có phải là tam giác đều hay không? Mong mn giúp🥺
uses crt;
var a,b,c:integer;
begin
clrscr;
readln(a,b,c);
if (a=b) and (b=c) then write('YES')
else write('NO');
readln;
end.
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
viết chương trình nhập vào hai số nguyên và in ra màn hình số đảo của hai số đó. sử dụng câu lệnh điều kiện