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.

1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26 2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); * A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến...
Đọc tiếp
1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26

2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); *

A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20;

3, Trong câu lệnh lặp For i:=3 to 15 do s:=s+i; Có bao nhiêu vòng lặp? *

A. 15; B. 12; C. 13 D. 3;

4, Cho k,m,n nhận giá trị tương ứng 4,5,6; kết thúc câu lệnh sau:X:=n; If ((x mod 2=0)) or (x<=5) then x:=m*k else x:=m div k; thì x có giá trị là ? *

A. 1 B. 0 C. 5. D. 20 5, Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?s:=0; n:=0; while s<=5 do n:= n+1;s:= s+n; * A. 3 B. 6 C. 10 D. kết quả khác 6, Cho a,b,c lần lượt nhận giá trị 10,30,20 . Hỏi sau đoạn chương trình Begin X:=a; If x>a then x:=a; if x>b then x:=b;if x>c then x:=c;end; x có giá trị là? * A. 20 B. 10 C. 30 D. Cả ba đáp án đều sai. 7, Cho x:=7; kết thúc câu lệnh If ((x mod 3=0)) and (x<=8) then x:=x+10; thì x có giá trị là ? * A. 8 B. 10 C. 17 D. 7 8, Cho s và i là biến nguyên. Khi chạy đoạn chương trình s := 1; for i:=1 to 5 do s := s+i; Kết quả in lên màn hình là của s là ? * A. 15 B. 16 C. 11 D. 22 9, Cho biết đoạn chương trình Pascal sau đây, khi kết thúc giá trị của S bằng bao nhiêu? S:=0; n:=0;while S<=3 do begin n:= n+1;S:= s+n; end; * A. 15 B. 10 C. 6 D. 3
1
10 tháng 12 2020

1. C

2. D

3. C

4. D

5. D

6. B

7. D

8. B

9. C

 

26 tháng 2 2022

Sai

A. Lý Thuyết: Nêu ý nghĩa của các từ khóa,câu lệnh trong Pascal: program,begin,end,uses,var,const,clrscr,delay(x),write ( ),readln,readln (x) Trắc nghiệm: Câu 1: Các ngôn ngữ lập trình phân chia dữ liệu thành các kiểu dữ liệu khác nhau với mục đích gì ? Hãy chọn phương án sai: ​ a)Sử dụng bộ nhớ máy tính có hiệu quả b)Thực hiện các phép toán tương ứng với từng kiểu dữ liệu c)Tự động hóa...
Đọc tiếp

A. Lý Thuyết:

Nêu ý nghĩa của các từ khóa,câu lệnh trong Pascal: program,begin,end,uses,var,const,clrscr,delay(x),write ( ),readln,readln (x)

Trắc nghiệm:

Câu 1: Các ngôn ngữ lập trình phân chia dữ liệu thành các kiểu dữ liệu khác nhau với mục đích gì ? Hãy chọn phương án sai:

a)Sử dụng bộ nhớ máy tính có hiệu quả

b)Thực hiện các phép toán tương ứng với từng kiểu dữ liệu

c)Tự động hóa việc viết chương trình

Câu 2:Hãy chọn câu đúng:

a)14/5=2; 14 div 5 = 2 ; 14 mod 5 = 4

b)14/5=2.8; 14 div 5 = 2 ; 14 mod 5 = 4

c) 14/5=2.8; 14 div 5 = 2 ; 14 mod 5 = 2

d) 14/5=3; 14 div 5 = 2 ; 14 mod 5 = 4

Câu 3: Giá trị của biến a sau khi thực hiện chương trình: "a:=5 ; a:=a–4" là:

a) 1 b) 2 c) 3 d) 4

Câu 4: Số biến có thể khai báo tối đa trong một chương trình là bao nhiêu:

a)Chỉ một biến cho một kiểu dữ liệu

b)Chỉ hạn chế bởi dung lượng nhớ

c) 10 biến

d) Không giới hạn

Câu 5: Giả sử A được khai báo là biến với kiểu dữ liệu là số thực,phép gán nào đúng:

a)A:= ' 38.59 b) A:=35.59; c) A:=3559 d) cả b và c đều đúng

Câu 6:Trong Pascal,khai báo đúng là:

a) Var chieudai:real

b) Var 40HS: integer

c) Var R=50

d) Cả b và c đều đúng

B. Bài Tập:

1. Tìm ra chỗ sai ( gạch chân ) và giải thích tại sao sai :

a) var a,b:=integer

const c:=4 ;

begin :

a:= 10

b:=a/c;

write( ' gia tri cua b la ' b);

end.

b) var : a: real; b: integer;

const c:=4

begin

c:=4.1;

a:=10;

b:=a/c

write( ' gia tri cua b la ' b )

end

2. Viết thuật toán rồi viết chương trình bằng ngôn ngữ Pascal để giải bài toán:

a) Tính tổng của n số tự nhiên đầu tiên. Lậo bảng chạy tay với n=10, n=15

b) Hoán đổi giá trị của 2 biến x và y. Lập bảng chạy tay với x 🔙 10; y 🔙1

Mong các bạn giúp mình !

0
26 tháng 4 2019

1 : có trong sgk

3:

a) b1: T←0;

B2: 1 → n ;

B3 : T:=T+1/(i*i) ;

B4: Kết thúc

26 tháng 4 2019

var a:array[1..32000] of integer;

i,n,j,tam:integer;

begin

write('nhap n='); readln(n);

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

for i:=1 to n-1 do

for j:=i+1 to n do

if a[i] > a[j] then

begin

tam:=a[i]; a[i]:=a[j]; a[j]:=tam;

end;

writeln('ket qua sap xep la:');

for i:=1 to n do write(A[i]:5);

readln

end.

2 tháng 5 2021

a,Thứ tự sắp xếp đúng là 9,10,1,12,11,3,4,5,6,7,8,2,13,14

b,Công dụng để tính tổng các số chẵn lớn hơn 50

2 tháng 5 2021

nhỏ nha bạn nhầm:<<

 

Câu 1: Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal?A. 8a B. tamgiac C. program D. bai tapCâu 2: Để chạy chương trình trong Turbo Pascal ta dùng tổ hợp phím nào?A. Ctrl + F9 B. Alt + F9 C. Ctrl + Shitf +F9 D. F9 Câu 3: Các thành phấn cơ bản của một ngôn ngữ lập trình là:A. Các từ khóa...
Đọc tiếp

Câu 1: Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal?

A. 8a B. tamgiac C. program D. bai tap

Câu 2: Để chạy chương trình trong Turbo Pascal ta dùng tổ hợp phím nào?

A. Ctrl + F9 B. Alt + F9 C. Ctrl + Shitf +F9 D. F9

Câu 3: Các thành phấn cơ bản của một ngôn ngữ lập trình là:

A. Các từ khóa và tên. B. Bảng chữ cái và các từ khóa.

C. Bảng chữ cái, các từ khóa và tên. D. Bảng chữ cái và các quy tắc.

Câu 4: Biểu thức toán học (a2 + b)(1 + c)3 được biểu diễn trong Pascal như thế nào?

A. (a*a + b)(1+c)(1 + c)(1 + c) B. (a.a + b)(1 + c)(1 + c)(1 + c)

C. (a*a + b)*(1 + c)*(1 + c)*(1 + c) D. (a2 + b)(1 + c)3

Câu 5: Trong Pascal, khai báo nào sau đây là đúng?

A. Var tb : real ; B. Var 4hs: integer ; C. Const x : real ; D. Var R = 30 ;

Câu 6: Trong Pascal, những tên có ý nghĩa được xác định từ trước và không được phép sử dụng cho mục đích khác thì được gọi là:

A. Tên có sẵn B. Tên riêng C. Từ khóa D. Biến

Câu 7: (5.0 điểm)

Viết chương trình nhập vào 2 số a, b từ bàn phím, tính trung bình cộng của hai số a, b và in kết quả ra màn hình.

Giúp mình với nha!

4
24 tháng 10 2016

1B 4C

2A 5A

3C 6C

7.

program TBC;

uses crt;

var a,b,tbc:real;

begin

clrscr;

write('nhap so a:');readln(a);

write('nhap so b:');readln(b);

tbc:=(a+b):2;

writeln('tbc cua hai so a va b la:',tbc:6:2);

readln;

end.

 

24 tháng 10 2016

dễ mà@@@
 

Đoạn chương trình 1:

j=7

k=10

Đoạn chương trình 2:

j=7

k=28

18 tháng 10 2016

câu 1:

var x:string

     y:integer

Câu 2:

var a,b:integer

begin

write('hay nhap gia tri cua a')

read(a)

wrietln('hãy nhập giá trị b')

read(b)

t:=a+b

writeln('tông cua a va b la',t)

 

18 tháng 10 2016

? đây là toán mà