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.
Em hãy điền các bước vào sơ đồ cấu trúc rẽ nhánh dạng đủ bên dưới để mô tả thuật toán thực hiện hoạt động ''Kiểm tra số a là số lẻ hay số chẳn''
1. Số chẵn
2. Số lẻ
3. a chia hết cho 2
4. Đúng
5. Sai
#Hỏi cộng đồng OLM
#Tin học lớp 6
uses crt;
var a:integer;
begin
clrscr;
readln(a);
if a mod 2=0 then write(a,' la so chan')
else write(a,' la so le');
readln;
end.
Đề không cho kiểu dữ liệu gì nên mình vt longint
var A,B,C,D:longint;
begin
write('nhap A='); readln(A);
write('nhap B='); readln(B);
write('nhap C='); readln(C);
write('nhap D='); readln(D);
if A mod 2 = 0 then writeln(A,' la so chan') else writeln(A, ' la so le');
if B mod 3 = 0 then writeln(B,' chia het cho 3') else writeln(B,' ko chia het cho 3');
if C mod 5 = 0 then writeln(C,' chia het cho 5') else writeln(C,' ko chia het cho 5');
if D mod 9 = 0 then writeln(D,'chia het cho 9') else write(D,' ko chia het cho 9');
end.
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{cin>>a>>b;
if (a>b) cout<<"a lon hon b";
else if (a<b) cout<<"a nho hon b";
else cout<<"a bang b";
return 0;
}
Program hotrotinhoc;
var i,n,s,k,max,n1: longint;
begin
write('Nhap N='); readln(n);
max:=0; n1:=n;
while n<>0 do
begin
k:=n mod 10;
s:=s*10+k;
n:=n div 10;
if k>max then max:=k;
end;
writeln('Chu so lon nhat cua so tu nhien vua nhap la :',max);
If s=n1 then write('La so doi xung') else write('Khong phai so doi
xung');
readln
end.
uses crt;
var n,i,d,x,ln,kt:word;
st:string;
a:array[1..100]of integer;
begin
clrscr;
write('nhap n='); readln(n);
str(n,st);
d:=length(st);
for i:=1 to d do
val(st[i],a[i],x);
ln:=0;
for i:=1 to d do
if ln<a[i] then ln:=a[i];
writeln('chu so lon nhat trong so ',n,' la: ',ln);
{-----------------------kiem-tra-doi-xung----------------------------}
kt:=0;
for i:=1 to d do
if a[i]<>a[d+1-i] then kt:=1;
if kt=0 then writeln('day la so doi xung')
else writeln('day khong la so doi xung');
readln;
end.