Trong các số 39 ; 45; 171 ; 270 Số chia hết cho 2 là:
A. 39
B. 45
C. 270
D. 171
Câu 10: Trong hình biết các số đo của MN = 1 cm .
MM' // NN' , OM' = 3 cm , M'N' = 1,5 cm .
Số đo của đoạn thẳng OM trong hình bên là .
A. 3 cm B . 1,5 cm
C. 2 cm D. 2,5 cm
cho một sâu kí tự St có độ dài tối đa 255 ký tự các ký tự được lấy từ tập'a'..'z''A'..'Z''0'..'9;
yêu cầu tách sâu st thành hai sâu st1 gồm các ký tự chữ cái xâu st2 gồm các ký tự chữ số các ký tự trong st1 và st2 vẫn được giữ nguyên thứ tụ từ trái sang phải
giúp mình với ạ
Trong các phân số: 4/7, 9/5, 15/21, 12/12, 17/15, 39/39
- Các phân số bé hơn 1 là:.............
- Các phân số bằng 1 là:..........
- Các phân số lớn hơn 1 là:.................
giúp mình với trả lời mik tick cho nhé
giúp mik đi mà, trả lời mik tick cho nhé
- Các phân số bé hơn 1 là : 4/7 , 15/21.
- Các phân số bằng 1 là : 12/12, 39/39.
- Các phân số lớn hơn 1 là : 9/5, 17/15.
cho một sâu kí tự St có độ dài tối đa 255 ký tự các ký tự được lấy từ tập'a'..'z''A'..'Z''0'..'9;
yêu cầu tách sâu st thành hai sâu st1 gồm các ký tự chữ cái xâu st2 gồm các ký tự chữ số các ký tự trong st1 và st2 vẫn được giữ nguyên thứ tụ từ trái sang phải
giúp mình với ạ
uses crt;
var st:string;
i,d:integer;
begin
clrscr;
readln(st);
d:=length(st);
for i:=1 to d do
if (st[i] in ['a'..'z']) or (st[i] in ['A'..'Z']) then write(st[i]);
writeln;
for i:=1 to d do
if (st[i] in ['0'..'9']) then write(st[i]);
readln;
end.
Tìm các cạp phân số bằng nhau ( có giải thích ) trong các phân số sau đây :
25/35 ; 26/39 ; 38/57 ; 39/65 ; 51/85 ; 55/77
Giúp mình giải 2 bài này với ạ Câu 1: Viết chương trình
- Đọc từ tệp ''DULIEU.INP'' 2 số nguyên M và N (M<N)
- Tính tổng các số lẻ trong phạm vi từ M đến N
- Ghi kết quả ra tệp ''KETQUA.OUT''
Câu 2: Sử dụng chương trình con lập trình
- Nhập vào mảng A gồm N phần tử thuộc kiểu nguyên (0< N < 103). Viết chương trình tìm phần từ nhỏ nhất của mảng A.
- Tìm phần tử lớn nhất trong dãy A.
- Đếm phần tử chẵn, lẻ trong dãy A.
- Tổng các phần tử chẵn, lẻ trong dãy A.
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n,min,dem1,dem2,t1,t2:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=1 to n do
if max<a[i] then max:=a[i];
writeln('Gia tri lon nhat la: ',max);
dem1:=0;
dem2:=0;
t1:=0;
t2:=0;
for i:=1 to n do
begin
if a[i] mod 2=0 then
begin
inc(dem1);
t1:=t1+a[i];
end
else begin
inc(dem2);
t2:=t2+a[i];
end;
end;
writeln('So so chan la: ',dem1);
writeln('So so le la: ',dem2);
writeln('Tong cac so chan la: ',t1);
writeln('Tong cac so le la: ',t2);
readln;
end.
Câu 1:
const fi='dulieu.inp'
fo='ketqua.out'
var f1,f2:text;
m,n,t,i:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,m,n);
t:=0;
for i:=m to n do
if i mod 2=1 then t:=t+i;
writeln(f2,t);
close(f1);
close(f2);
end.
cho 2 đường thẳng xx' yy' cắt nhau trong các góc tạo thành có 1 góc =45 độ tính số đo các góc còn lại
Tìm các cặp phân số bằng nhau có giải thích trong các phân số sau: 25 phần 35; 26 phần 39 ;38 phần 57 ;39 phần 65; 51 phần 85;55 phần 77
26/39=38/57
55/77=25/35
39/65=51/85
trong các phân số : 4/7; 9/5; 15/21 ;12/12 ;17/15 ;39/39 làm giúp em với
Vẽ hai đường thẳng xx' và yy' cắt nhau tại O, biêta xOy=60. Tìm các số đo các góc khác góc bẹt có trong hình.