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.
Câu 1: B
Câu 2: D
Câu 3: D
Câu 4: Thông báo lỗi
Câu 5: C
Câu 6: B
Câu 7: C
Câu 8: D
Câu 9: Hoán đổi giá trị hai biến a và b nhé bạn
Câu 10: B
Câu 11: B
Câu 12: D
Câu 13: C
Câu 14: A
Câu 15: C
Câu 16:
-Cấu trúc rẽ nhánh có 2 dạngCâu 17
uses crt;
var a:integer;
begin
clrscr;
write('a='); readln(a);
if a mod 2=0 then writeln(a,' la so chan')
else writeln(a,' la so le');
readln;
end.
C1: A
C2: D
C3: D
C4: báo lỗi
C5: C
C6: B
C7: C
C8: D
C9: Hoán đổi gt biến a và b
C10: B
C11: B
C12: D
C13: C
C14: A
C15: C
C16
- Cấu trúc rẽ nhánh có 2 loại
C17
program bai12;
uses crt;
var
begin
clrcr;
write('Nhap mot so N= ');readln(n);
if n>10 then writeln(n,'>10');
if n<10 then writeln(n,'<10');
readln
end.
uses crt;
var a:array[1..10000]of integer;
n,i,t,dem:integer;
begin
clrscr;
repeat
write('nhap n='); readln(n);
until (0<n) and (n<10000);
for i:=1 to n do
begin
repeat
write('a[',i,']='); readln(a[i]);
until (a[i]<=109);
end;
t:=0;
dem:=0;
for i:=1 to n do
if a[i]<0 then
begin
t:=t+a[i];
inc(dem);
end;
writeln('Trung binh cong cac so am la: ',t/dem:4:2);
readln;
end.
- Bước 1: Ở bước này giá trị của x sẽ bằng x cộng với y: x= x+y.
- Bước 2: Tiếp đến giá trị của y bằng giá trị của x – y: y= x (bước 1)-y= x+y-y= x.
- Bước 3: Cuối cùng giá trị của x bằng x-y: x=x(bước1)-y(bước 2)= x+y-x=y.
Vậy kết quả của thuật toán là x=y và y=x
- Bước 1: Ở bước này giá trị của x sẽ bằng x cộng với y: x= x+y.
- Bước 2: Tiếp đến giá trị của y bằng giá trị của x – y: y= x (bước 1)-y= x+y-y= x.
- Bước 3: Cuối cùng giá trị của x bằng x-y: x=x(bước1)-y(bước 2)= x+y-x=y.
Vậy kết quả của thuật toán là x=y và y=x
uses crt;
const fi='standard.inp';
fo='standard.out';
var f1,f2:text;
a:array[1..100]of integer;
i,j,n,dem,t:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,n);
for i:=1 to n do
readln(f1,a[i]);
{--------------------xu-ly------------------}
for i:=1 to n do
begin
write(f2,a[i],' co so uoc la: ');
dem:=0;
t:=0;
for j:=1 to a[i] do
if a[i] mod j=0 then
begin
dem:=dem+1;
t:=t+j;
end;
writeln(f2,dem.,' tong uoc la: ',t);
end;
close(f1);
close(f2);
readln;
end.
program crtg;
uses crt;
var n,i, j: integer;
A: array[1..1000] of byte;
tb: integer;
min,max: byte;
begin
clrscr;
writeln('Nhap do dai day A: '); read(n);
writeln('Nhap cac phan tu cua day: ');
for i:=1 to n do
begin
writeln('a[',i,'] = ');
repeat
read(a[i]);
until a < 100;
end;
for i:= 1 to n do
begin
if a[i] <> 1 then
begin
j:= 2;
while (a[i] mod j <> 0) do j:=j+1;
if j = a[i] then write(a[i]',');
end;
end;
tb:=0;
for i:=1 to n do
tb:=tb+a[i];
tb:=tb/n;
writeln('Gia tri trung binh cua day tren la: ',tb);
max:=a[1]; min:=a[1];
for i:=2 to n do
begin
if a[i] < min then min:=a[i];
if a[i] > max then max:=a[i];
end;
writeln('Gia tri lon nhat cua day la ',max);
writeln('Gia tri nho nhat cua day la ',min);
readln
end.
Mình sử dụng ngôn ngữ c++:
#include <bits/stdc++.h>
using namespace std;
long long a[5];
int main()
{
for(int i=1;i<=4;i++){
cin>>a[i];
}
sort(a+1,a+5);
cout<<a[1];
return 0;
}