Nêu sự khác nhau giữa biến và hằng và cho một vài ví dụ cụ thể về khai báo biến và hằng.
Nêu sự khác nhau giữa biến và hằng và cho một vài ví dụ cụ thể về khai báo biến và hằng.
Sự khác nhau giữa biến và hằng:
- Biến là đại lượng có thể thay đổi giá trị trong chương trình.
- Hằng là đại lượng không đổi trong suốt chương trình.
* Khai báo biến:
Var a:integer;
*) Khai báo hằng:
Const pi=3.14;
Nhập mảng a.Đổi các phần tử của mảng a thành nhị phân và đưa vào mảng B.
Mn giúp mik vs ạ, mik cảm ơn
1)Nhập vào mảng A.Tìm số nguyên tố lớn nhất trong mảng A đó.
2)Nhập vào mảng A.Tìm số song tố lớn nhất trong mảng A đó.
Mn giúp mik vs ạ
Câu 1:
uses crt;
var a:array[1..100]of integer;
kt:boolean;
n,i,ln,j:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
ln:=0;
for i:=1 to n do
if a[i]>1 then
begin
kt:=true;
for j:=2 to trunc(sqrt(a[i])) do
if a[i] mod j=0 then kt:=false;
if kt=true then
begin
if ln<a[i] then ln:=a[i];
end;
end;
if ln=0 then write('Khong co so nguyen to')
else writeln(ln);
readln;
end.
Câu 1: Khai báo mảng gồm 100 phần tử Câu 2: Nếu vòng lặp for...do in ra màn hình các số 1 2 3...19 20 Câu 3: Vòng lặp sau cho kết quả là bao nhiêu? S=1; for i:=1 to 4 do S:=S*2; Câu 4: Nêu 3 ví dụ về: a/Vòng lặp chưa biết trước số lần lặp b/Vòng lặp biết trước số lần lặp
Câu 1: var a:array[1..100]of integer;
Câu 2: for i:=1 to 20 do write(i:4);
Em hãy viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình giá trị của N số đã nhập
bn tham khảo
uses crt;
var A:array[1..100] of longint;
i,n:longint;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
write('A[',i,']=');
readln(A[i]);
end;
writeln('Cac so da nhap la: ');
for i:=1 to n do
write(A[i],',');
readln
end.
program songuyen;
uses crt;
var i, n: integer;
a: array[1..500] of integer;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
Write('Nhap a[',i,']= '); readln(a[i]);
end;
writeln('Cac so da nhap la: ');
for i:=1 to n do
write(A[i],',');
readln;
end.
Câu 18 . Giá trị của biểu thức -5 MOD 2 là:
A. 3 B. -1 C. -3 D. -2
Câu 18 . Giá trị của biểu thức -5 MOD 2 là:
A. 3 B. -1 C. -3 D. -2
-> CHỌN ĐÁP ÁN BDưới đây là một chương trình viết trong Pascal:
program CT_Dau_tien ;
Uses crt ;
begin
writeln ( ‘Toi la Turbo Pascal’ )
end.
Tên chương trình là:
A begin. B. end C. writeln D. crt
1 là bn sửa hình nền
2 là mk gọi admin hoặc giáo viên khác khoá nick bn
Tìm số ngày của năm N(1000<=N<=9999). Biết rằng năm nhuận là năm chia hết cho 400 hoặc chia hết cho 4 nhưng không chia hết cho 100. Dữ liệu vào: NAMNHUAN.INP gồm Một số duy nhất là N Dữ liệu ra: NAMNHUAN.OUT gồm một dòng 2 số tương ứng năm N và số ngày của năm N(các số cách nhau một dấu cách).
#include <bits/stdc++.h>
using namespace std;
long long n;
int main()
{
freopen("namnhuan.inp","r",stdin);
freopen("namnhuan.out","w",stdout);
cin>>n;
if ((n%400==0) or (n%4==0 && n%100!=0)) cout<<366;
else cout<<365;
return 0;
}
ìm hiểu đoạn chương trình sau đây. Khồng cần viết chương trình,hãy cho biết lệnh writeln in ra màn hình giá trị của i,j,k là bao nhiêu?
i:=1;j:=2;k:=3;
while i<=6 do
begin i:=i+1; j:=j+1; k:=k+j; end;
space:=' '
write(I,space,j,space,k);
Viết chương trình nhập vào hai số nguyên. In ra tổng và hiệu của nó
Program CTVHOC24;
uses crt;
var a,b: integer;
begin
clrscr;
write('nhap so a ='); readln(a);
write('nhap so b ='); readln(b);
writeln('tong cua a va b =',a+b);
writeln('hieu cua a va b =',a-b);
writeln('tich cua a va b =',a*b);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
cout<<a+b<<endl;
cout<<a-b;
return 0;
}