Trong 1 chương trình, biến nguyên x có thể nhận giá trị trong phạm vi [0; 258], biến y nhận giá trị [-25;25]. Khai báo nào đúng
Trong 1 chương trình, biến M có thể nhận các giá trị: 10, 15, 20, 30, 40 và biến N có thể nhận các giá trị: 1.0, 1.5, 2.0, 2.5, 3.0. Khai báo nào trong các khai báo sau là đúng?
A. Var M,N: Byte;
B. Var M: Real; N: Word;
C. Var M: Byte; N: Real;
D. Var M, N: Longint;
Trong 1 chương trình, biến M có thể nhận các giá trị: 10, 15, 20, 30, 40 và biến N có thể nhận các giá trị: 1.0, 1.5, 2.0, 2.5, 3.0. Khai báo nào trong các khai báo sau là đúng?
A. Var M,N :Byte;
B. Var M: Real; N: Word;
C. Var M: Word; N: Real;
D. Var M, N: Longint;
1.Phát biểu nào dưới đây là hợp lí nhất?
o A. Biến là đại lượng được đặt tên và có giá trị thay đổi trong quá trình thực hiện chương trình.
o B. Biến có thể đặt hoặc không đặt tên gọi.
o C. Biến là đại lượng nhận giá trị trước khi chương trình thực hiện.
o D. Biến có thể lưu trữ nhiều loại giá trị khác nhau.
· 2. Phát biểu nào sau đây chắc chắn sai?
o A. Mọi bài toán đều có thể giải được bằng máy tính;
o B. Một bài toán có thể có nhiều thuật toán để giải;
o C. Không thể viết được chương trình để giải một bài toán nếu như không biết thuật toán để giải bài toán đó;
o D. Chương trình là một mô tả thuật toán bằng một ngôn ngữ lập trình;
· 3. Hãy chọn phát biểu sai?
o A. Một chương trình luôn luôn có hai phần : phần khai báo và phần thân
o B. Các biến đều phải được khai báo và mỗi biến chỉ khai báo một lần
o C. Sau từ khóa var có thể khai báo nhiều danh sách biến khác nhau
o D. Chương trình dịch có hai loại: thông dịch và biên dịch
· 4. Phát biểu nào dưới đây là đúng?
o A. Máy tính chỉ nhận biết được kí tự 0 và kí tự 1 nên chương trình bằng ngôn ngữ máy cũng phải được dịch sang mã nhị phân;
o B. Chương trình dịch gồm hợp dịch, thông dịch, biên dịch;
o C. Mỗi ngôn ngữ lập trình bậc cao đều có đúng một chương trình dịch;
o D. Một ngôn ngữ lập trình bậc cao có thể có nhiều chương trình dịch khác nhau;
· 5. Trong những biểu diễn dưới đây, biểu diễn nào là từ khóa trong Pascal?
o A. Crt
o B. Sqrt
o C. End
o D. LongInt
· 6. Phát biểu nào dưới đây chắc chắn sai?
o A. Chương trình dịch giúp tìm ra tất cả các lỗi của chương trình;
o
B. Chương trình dịch cho phép chuyển chương trình viết bằng một ngôn ngữ lập trình nào đó sang chương trình trên ngôn ngữ máy để máy có thể thực hiện được mà vẫn bảo toàn được ngữ nghĩa của chương trình nguồn;
o C. Chương trình dịch giúp người lập trình có thể lập trình trên một ngôn ngữ lập trình gần với ngôn ngữ tự nhiên hơn, do đó giảm nhẹ được nỗ lực lập trình, tăng cường hiệu suất lập trình;
o D. Một ngôn ngữ lập trình có thể có cả chương trình thông dịch và chương trình biên dịch;
· 7. Phát biểu nào dưới đây là đúng?
o A. Chương trình có lỗi cú pháp có thể được dịch ra ngôn ngữ máy nhưng không thực hiện được;
o B. Ngoài bảng chữ cái, có thể dùng các kí tự thông dụng trong toán học để viết chương trình;
o C. Cú pháp là bộ quy tắc dùng để viết chương trình;
o D. Ngoài bảng chữ cái, cú pháp, ngữ nghĩa, một ngôn ngữ lập trình còn có các quy tắc để khai báo biến, hằng…;
· 8. Chương trình dịch không có khả năng nào trong các khả năng sau?
o A. Phát hiện được lỗi cú pháp
o B. Phát hiện được lỗi ngữ nghĩa
o C. Tạo được chương trình đích
o D. Thông báo lỗi cú pháp
· 9. Trong Pascal, các đoạn chú thích được đặt giữa cặp dấu nào?
o A. { và }
o B. /* và */
o C. ( và )
o D. [ và ]
· 10. Hãy chọn biểu diễn tên đúng trong những biểu diễn sau
o A. Tensai
o B. -tenkhongsai
o C. (bai_tap)
o D. ‘*****’
Viết chương trình tính tổng các giá trị lẻ trong phạm vi từ 1 đến N
(Số nguyên dương N được nhập vào từ bàn phím)
Program bt_3;
Uses crt;
Var Tong, n, i: integer;
Begin
Clrscr;
Writeln(‘nhap n=’);
Readln (n);
Tong:=0;
For i:=1 to n do
If I mod 2 = 1 then Tong:= Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.
Viết chương trình tính tổng các giá trị chẵn trong phạm vi từ 1 đến N
(Số nguyên dương N được nhập vào từ bàn phím)
Program bt_3;
Uses crt;
Var Tong, n, i: integer;
Begin
Clrscr;
Writeln(‘nhap n=’);
Readln (n);
Tong:=0;
For i:=1 to n do
If I mod 2 = 0 then Tong:= Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.
Viết chương trình tính tổng các giá trị là bội của 5 trong phạm vi từ 1 đến N
(Số nguyên dương N được nhập vào từ bàn phím)
Program bt_3;
Uses crt;
Var Tong, n, i: integer;
Begin
Clrscr;
Writeln(‘nhap n=’);
Readln (n);
Tong:=0;
For i:=1 to n do
If I mod 5 = 0 then Tong:= Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.
Viết chương trình tính tổng các giá trị là bội của 3 trong phạm vi từ 1 đến N
(Số nguyên dương N được nhập vào từ bàn phím)
Program bt_3;
Uses crt;
Var Tong, n, i: integer;
Begin
Clrscr;
Writeln(‘nhap n=’);
Readln (n);
Tong:=0;
For i:=1 to n do
If I mod 3 = 0 then Tong:=Tong+i;
Writeln(‘Tong la:’,Tong);
Readln
End.
Viết chương trình nhập vào số nguyên dương k, N (N≤1000), và các phần tử của mảng từ
A 1 ,…,A N là các số nguyên trong phạm vi từ ±5000. Tìm và xuất ra màn hinh
a) Có bao nhiêu phần tử có giá trị bằng k.
b) Vị trị của các phần tử có giá trị bằng k. Tính tổng các số có giá trị bằng k.
Var i,k,n,bk,tong: integer;
a: array[1..1000] of integer;
Begin
write('Nhap K: '); readln(k);
write('Nhap N: '); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
{câu a}
For i:=1 to n do
if a[i]=k then bk:=bk+1;
writeln('Co so phan tu bang k la:',k);
{câu b}
For i:=1 to n do
if a[i]=k then
begin
write(i,' ');
tong:=tong+a[i];
end;
write('. Tong la:',tong);
readln
end.
uses crt;
var k,n,tong,d,i:longint;a:array[1..1000]of longint;
begin
clrscr;
write('n=');readln(n);
write('k=');readln(k);
for i:=1 to n do
begin
write('a[',i,']=');readln(a[i]);
end;
d:=0;
for i:=1 to n do if(a[i]=k)then inc(d);
writeln('so phan tu bang voi:',k,' la:',d);
write('cac so co vi tri bang voi:',k,' la:');
tong:=0;
for i:=1 to n do if(a[i]=k)then
begin
write(i,' ');
tong:=tong+a[i];
end;
write('tong cua cac so bang voi:',k,' la:',tong);
readln;
end.
1)viết chương trình xuất ra các bội số của B trong phạm vị từ 1 đến N, với giá trị B, N được nhập vào từ bàn phím
2) nhập số nguyên n, viết chương trình xem số n có phải là số nguyên tố không
3)viết chương trình kiểm tra C có phải số hoàn hảo hay không
2:
#include <bits/stdc++.h>
using namespace std;
int main()
{
int n,i,kt=0;
cin>>n;
for (int i=2; i*i<=n; i++)
if (n%i==0) kt=1;
if (kt==0) cout<<"YES";
else cout<<"NO";
}