Trong một chương trình A. Tất cả các ý đều sai B. Phải có một CTC C. Không cần có CTC nào D. Phải có nhiều CTC
K
Khách
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.
Những câu hỏi liên quan
5 tháng 5 2021
Bài 1:
uses crt;
var m,n,i,t:integer;
begin
clrscr;
write('Nhap m='); readln(m);
write('Nhap n='); readln(n);
t:=0;
for i:=m to n do
t:=t+i;
writeln(t);
readln;
end.
5 tháng 5 2021
2:
uses crt;
var n:integer;
{---------------chuong-trinh-con-kiem-tra-chan-le---------------------}
function ktcl(x:integer):boolean;
begin
if x mod 2=0 then ktcl:=true
else ktcl:=false;
end;
{--------------------chuong-trinh-con-kiem-tra-duong-am-------------------}
fucntion ktda(x:integer):boolean;
begin
if x>0 then ktda:=true
else if x<0 then ktda:=false;
end;
{--------------------chuong-trinh-chinh-------------------------}
begin
clrscr;
write('Nhap n='); readln(n);
if ktcl(n)=true then writeln('Day la so chan')
else writeln('Day la so le');
if ktda(n)=true then writeln('Day la so duong')
else writeln('Day la so am');
readln;
end.
DD
Nhập mảng 1 chiều A gồm K phần tử. Hãy cho bt trong mảng A có bn phần tử là số Nguyên Tố.(có sd CTC)
1
ML
2 tháng 5 2023
Program HOC24;
var d,i,k: integer;
a: array[1..1000] of integer;
function nt(x: integer): boolean;
var j: integer;
begin
nt:=true;
if (x=2) or (x=3) then exit;
nt:=false;
if (x=1) or (x mod 2=0) or (x mod 3=0) then exit;
j:=5;
while j<=trunc(sqrt(x)) do
begin
if (x mod j=0) or (x mod (j+2)=0) then exit;
j:=j+6;
end;
nt:=true;
end;
begin
write('Nhap K: '); readln(k);
for i:=1 to k do
begin
write('A[',i,']='); readln(a[i]);
end;
d:=0;
for i:=1 to k do if nt(a[i]) then d:=d+1;
write('Co ',d,' so nguyen to trong mang A');
readln
end.
S
11 tháng 1 2022
a) Chiều dài gen : L = 18 . 3,4 = 61.,2 (Ao)
b) Trình tự các nu trên mạch gốc gen :
- A-X-G-X-A-X-A-T-X-G-A-G-T-A-X-X-X-T - (đề sửa C-> X)
chuỗi aa : - A-X-G-X-A-X-A-U-X-G-A-G-U-A-X-X-X-U -
30 tháng 11 2021
không có một loại thức ăn nào có thể cung cấp các đủ chất cần thiết cho hoạt động sống của cơ thể .Tất cả những chất mà cơ thể cần đều lấy từ nhiều phải lấy từ nhiều nguồn thức ăn khác nhau. Để có sức khỏe tốt , chúng ta phải ăn phối hợp nhiều loại thức ăn và thường xuyên thay đổi món ăn
HG
1
27 tháng 10 2019
uses crt;
var a,b,tam:integer;
{------------------------------------------------------}
procedure nhap(var n:integer);
begin
write('nhap mot so nguyen bat ky: '); readln(n);
end;
{--------------------------------------------------------}
procedure doicho(var x,y:integer);
begin
writeln('so a truoc khi thay doi la: ',x);
writeln('so b truoc khi thay doi la: ',y);
begin
tam:=x;
x:=y;
y:=tam;
end;
writeln('so a sau khi thay doi la: ',x);
writeln('so b sau khi thay doi la: ',y);
end;
{---------------------------------------------------------}
begin
clrscr;
nhap(a);
nhap(b);
doicho(a,b);
readln;
end.
Trong một chương trình. Có thể có hoặc không có một hay nhiều chương trình có.
=> Đáp án C.