uses crt;
var st:string;
kt,i,d:integer;
begin
clrscr;
readln(st);
d:=length(st);
kt:=0;
for i:=1 to d do
if st[i]<>st[d-i+1] then kt:=1;
if kt=0 then write('yes')
else write('no');
readln;
end.
uses crt;
var st:string;
kt,i,d:integer;
begin
clrscr;
readln(st);
d:=length(st);
kt:=0;
for i:=1 to d do
if st[i]<>st[d-i+1] then kt:=1;
if kt=0 then write('yes')
else write('no');
readln;
end.
nhập vào 2 số từ bàn phím kiểm tra xem tích 2 số đó có chia hết cho 5 hoặc 8 hay không?
giúp mik vs nha
Nhân 1 số nguyên dương n, hãy kiểm tra n có phải là 1 số hoàn hảo không .gợi ý số hoàn hảo là số có tổng các ước (ngoại trừ nó) bàng chính nó
Vd: 6 có Ư{1;2;3}
Hãy dùng câu lệnh lặp để viết thuật toán diễn đạt việc học thuộc bảng cửu chương 2 tới khi cô giáo dạy toán kiểm tra đã thuộc thì mới kết thúc, nếu không thì phải học lại
Viết ct kiểm tra só đó có phải số nguyên tố ko
kiểm tra xem các số trong phạm vi từ 1đến N có số nào bằng X hay không với X nhập từ bàn phím.
em cần luôn ạ
Khi thực hiện các hoạt động lặp, chương trình kiểm tra một điều kiện. Với lệnh lặp:
for < biến đếm > := < giá trị đầu > to < giá trị cuối > do < câu lệnh >;
của Pascal, điều kiện cần phải kiểm tra là gì?
Viết CT nhập vào một số, kiểm tra xem số đó có phải là số chính phương ko ? (Sử dụng câu lệnh lặp nha mấy bạn.) Ai bt thì cho mình câu hỏi. Cảm ơn nhìu
Bài tập 1:Khi thực hiện câu lệnh lặp for, to, do máy tính kiểm tra một điều kiện, điều kiện cần phảikiểm tra là gì?
Giúp mik vs ạ
Viết chương trình vào 1 số nguyên kiểm tra xem có phải là số nguyên tố chẵn hay lẻ?????
Mai mik ktra rùi huhuhuhuhuuhuh
Viet chương trình nhập vào từ bàn phím một số tự nhiên. Kiểm tra số đó có phải số nguyên tố hay ko.
Giúp mk nha. Thanks trước.