VIết chương trình nhập biển số bất kì có bốn số rồi kết luận, đó có phải là biển số xe tứ quý ( bốn chữ số giống nhau) hay không ?

conchomay55555

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 35 xem

1 trả lời

Thích Trả lời

16081401

program biensoxe;

uses crt;

var a,b,c,d,e:real;

begin

writeln('nhap vao cac so cua bien so xe a,b,c,d,e');

readln(a,b,c,d,e);

if b=c=d=e then writr('day la bien so tu quy') else write('day khong phai la bien so chan');

end.

Vote (0) Phản hồi (0) 2 năm trước

VanThuy

uses crt;

var n, a, b, c, d : longint;

begin

clrscr;

write('Nhap so : '); readln(n);

if (n >= 1111) and (n <= 9999) then

begin a := n div 1000;

b := (n - a * 1000) div 100;

c := (n - a * 1000 - b * 100) div 10;

d := n - a * 1000 - b * 100 - c * 10;

if (a = b) and (b = c) and (c = d) then

write(n,' la so tu quy') else write(n,' khong la so tu quy');

end else write(n,' khong la so tu quy');

readln

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

cánh của chim và cánh của bướm có hình dạng giống nhau.giải thích nguyên nhân đặc điểm giống /khác nhau . xếp loại cơ quan

Chứng minh rằng với n thuộc N ta có đăng thức 2+5+8+...+(3n-1)=n(3n+1)/2

gợi ý cho mình một tình huống nhầm lẫn nhát gan

Làm giúp em với ạ chỉ làm 3 thôi ạ

Giúp mình câu 9 hoặc câu 10 với

ID:60952 Độ khó: Vận dụng Khi điện phân dung dịch muối ăn trong nước, người ta thu được khí hiđrô tại catốt. Khí thu được có thể tích V= 1 (lít) ở nhiệt độ t = 27 (0C), áp suất p = 1 (atm). Điện lượng đã chuyển qua bình điện phân là

trình bày các bước mổ để quan sát cấu tạo trong của tôm sông em cám ơn ạ !!! <3

Ngoài công việc khí tượng kiêm vật lí địa cầu thì anh thanh niên làm những công việc phụ nào?

MỘT ĐOÀN HỌC SINH ĐI THAM QUAN BẰNG Ô TÔ . BIẾT RẰNG NẾU XẾP MỖI XE 15 HOẶC 25 EM THÌ SẼ KHÔNG DƯ MỘT AI . TÍNH SỐ HỌC SING TRONG ĐOÀN BIẾT SỐ HỌC SINH TRONG ĐOÀN KHOẢNG TỪ 100 ĐẾN 200 EM

Viết tập hợp ở các số tự nhiên không vượt quá 30 bằng hai cách

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến