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.

Câu 1: Đoạn chương trình sau cho kết quả gì? For i:=1 to 10 do write(i,' ); A.12 3 4 5 6 7 89 10 B.Đưa ra 10 khoảng trắng C.Không có kết quả D.1098 7 6 5 4 3 2 1 Câu 2: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do write('i'); A.iiiii B.5678910 C.i D.iii Câu 3: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do If i mod 5 = 0 then write (i); Diiiii A.1 2 3 4 5 B.1 2 3 4 5 6 7 8 9 10 C.5 10 Câu 4: Đoạn chương trình sau cho...
Đọc tiếp

Câu 1: Đoạn chương trình sau cho kết quả gì? For i:=1 to 10 do write(i,' );
A.12 3 4 5 6 7 89 10
B.Đưa ra 10 khoảng trắng
C.Không có kết quả
D.1098 7 6 5 4 3 2 1
Câu 2: Đoạn chương trình sau cho kết quả gì? For i:=5 to 10 do write('i');
A.iiiii
B.5678910
C.i
D.iii
Câu 3: Đoạn chương trình sau cho kết quả gì?
For i:=5 to 10 do
If i mod 5 = 0 then write (i);
Diiiii
A.1 2 3 4 5
B.1 2 3 4 5 6 7 8 9 10
C.5 10
Câu 4: Đoạn chương trình sau cho kết quả gì?
S:=1; For i:=5 to 10 do if i mod 3 = 0 then S:=S * i; Write(S);
A.54
B.15
C.50
D.151200
Câu 5: Cho đoạn chương trình sau:
a:=3; b:=2;
If a>b then a:=4 else b:=1;
Sau khi thực hiện đoạn chương trình trên cho kết quả:
A.a=3
B.b=2
C.a=4
D.b=1
Câu 6: Đoạn chương trình sau cho kết quả gì?
S:=0;
For i:=1 to 9 do S:=S+i;
Write(s);
A.45
B.40
C.55
Câu 7: Cho x là biến thực đã được gán giá trị 13.56423. Để hiện lên màn hình nội dung “x=13.6"
cần chọn câu lệnh nào sau đây?
A.Writeln(x:5);
B.Writeln(x);
C.Writeln("x=",x:5:2);
D.Writeln('x=',x:2:1);
Câu 8: Trong NNLT Pascal phát biểu nào sau đây là đúng:
A.Có phân biệt chữ hoa chữ thường.
B.Sau mỗi câu lệnh đều phải có dấu chấm phẩy.
C.Trước lệnh Else bắt buộc phải có dấu chấm phẩy.
D.Lệnh Readln trước câu lệnh End. Không nhất thiết phải có dấu chấm phẩy.
Câu 9: Để thoát khỏi chương trình Pascal ta sử dụng tổ hợp phím nào?
A.Ctrl + Q
B.Ctrl + X
C.Alt + Q
D.Alt +X
Câu 10: Vòng lặp sau đây lặp lại mấy lần?
A:=2
For i:=0 to 7 do a:=a+1;
A.6
B.7
C.8

0
I. Trắc nghiệm: Câu 1:Xác định bài toán là gì? A. Chỉ rõ các điều kiện cho trước và kết quả cần thu đc B. Chỉ rõ các điều kiện cho trước và phương pháp giải C. Chỉ rõ phương pháp giải và kết quả cần thu đc D. Chỉ rõ các bước để giải bài toán Câu 2: Giải thuật đổi giá trị hai biến x và y cho nhau, ta có thể thực hiện như sau: A. x -> z; z ->y; y-> x B. z->x; z->y; y->x C....
Đọc tiếp

I. Trắc nghiệm:
Câu 1:Xác định bài toán là gì?
A. Chỉ rõ các điều kiện cho trước và kết quả cần thu đc
B. Chỉ rõ các điều kiện cho trước và phương pháp giải
C. Chỉ rõ phương pháp giải và kết quả cần thu đc
D. Chỉ rõ các bước để giải bài toán
Câu 2: Giải thuật đổi giá trị hai biến x và y cho nhau, ta có thể thực hiện như sau:
A. x -> z; z ->y; y-> x B. z->x; z->y; y->x
C. z->x; x->y;y->z D. z->x; x->y; z->x
Câu 3: Phần thân chương trình của Pascal đc bắt đầu và kết thúc bởi cặp từ khóa:
A. Begin và end B. Begin: và end
C. Begin và end; D. Begin và end.
Câu 4: Kiểu dữ liệu thường dùng của Turbo Pascal là:
A. Xâu ký tự B. Số nguyên
C. Số thực D. Cả A, B và C đều đúng
Câu 5: Kết quả của phép chia 7 mod 5 thuộc kiểu gì?
A. Kiểu số nguyên B. Kiểu số thực
C. Kiểu xâu ký tự D. Kiểu thập phân
Câu 6: Nội dung các văn bản muốn ghi ra màn hình bằng lệnh Write phải đc đặt trong cặp dấu ngoặc:
A. ( và ) B. '' và '' C. ' và ' D. { và }
Câu 7: Để tăng biến nhớ X lên 1 đơn vị, ta thực hiện lệnh:
A. X => X + 1; B. X := X+1
C. X => X+ 1 D. X := X + 1;
Câu 8: Tính giá trị cuối cùng của c, biết rằng: a := 3; b := 5; a := a + b; c:= a+b;
A. c=8; B. c=3; C. c= 5; D. c= 13;
Câu 9: Câu lệnh Write và Writeln, Read và Readln khác nhau ở điểm nào?
A. Writeln và Readln sau khi thực hiện, con trở tự động xuống dòng kế tiếp
B. Write và Read sau khi thực hiện, con trở tự động xuống dòng kế tiếp
C. Write là viết ra còn Writeln là ghi vào
D. Read là đọc vào còn Readln là ghi ra
Câu 10: Cấu trúc rẽ nhánh dạng đủ có dạng như sau:
A. If <câu lệnh 1> Then <điều kiện> Else <Câu lệnh 2>;
B. If <điều kiện> Then <câu lệnh 1> Else <Câu lệnh 2>
C. If <điều kiện> Then <câu lệnh 1> Else <Câu lệnh 2>;
D.If <điều kiện> Then <câu lệnh 1>; Else <Câu lệnh 2>;
II. Tự luận:
11. Cấu trúc chương trình gồm mấy phần? Gồm những phần nào? Phần nào là quan trọng nhất và k thể thiếu đc?
12. Viết chương trình. Nhập vào ba số thực bất kỳ, báo ra màn hình giá trị lớn nhất trong ba số đó

0
Phần I. Trắc nghiệm. (5 điểm) 1. Nhặt thóc ra khỏi gạo cho đến khi trong gạo không còn lẫn thóc là hoạt động: a. Lặp 10 lần c. Lặp vô số lần (lặp vô hạn) b. Lặp với số lần chưa biết trước d. Lặp với số lần biết trước 2. Trong câu lệnh lặp For i:=1 to 10 do begin.... end bao nhiêu vòng lặp được thực hiện? a. Không lần nào b. 10 lần c. 1 lần ...
Đọc tiếp

Phần I. Trắc nghiệm. (5 điểm)
1. Nhặt thóc ra khỏi gạo cho đến khi trong gạo không còn lẫn thóc là hoạt động:
a. Lặp 10 lần c. Lặp vô số lần (lặp vô hạn)
b. Lặp với số lần chưa biết trước d. Lặp với số lần biết trước
2. Trong câu lệnh lặp For i:=1 to 10 do begin.... end bao nhiêu vòng lặp được thực hiện?
a. Không lần nào b. 10 lần c. 1 lần d. 2 lần
3. Điều kiện kết thúc vòng lặp For... do của Pascal là:
a. Biến đếm lớn hơn giá trị cuối c. Giá trị đầu bằng giá trị cuối
b. Biến đếm lớn hơn hoặc bằng giá trị cuối d. Giá trị đầu lớn hơn giá trị cuối
4. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
a. For i:=1 to 10; do x=x+1; c. For i:=1 to 10 do x:=x+1;
b. For i:=10 to 1 do x:=x+1; d. For i:=1.5 to 10 do x:=x+1;
5. Trong lệnh lặp For... do của Pascal, sau từ khóa “do” nếu có từ 2 câu lệnh trở lên (câu lệnh
ghép) thì câu lệnh ghép đó phải đặt trong cặp từ khóa nào sau đây?
a. Begin.....readln; b. Begin.....and;
c. End.....Begin d. Begin.....end;
6. Câu lệnh sau đây cho kết quả như thế nào?
For i:=1 to 10 do Writeln(‘A’);
a. In dãy số từ 10 đến 1 ra màn hình c. In dãy số từ 1 đến 10 ra màn hình
b. In 20 ký tự A ra màn hình d. In 10 ký tự A ra màn hình
7. Sau khi thực hiện đoạn chương trình sau, giá trị của biến T bằng bao nhiêu?

i := 0; T := 0;
While i &lt; 3 do
begin T := T + 1; i := i + 1; end;

a. T = 2 b. T = 3 c. T = 4 d. T = 5
8. Cú pháp của câu lệnh lặp với số lần chưa biết trước trong Pascal:
a. While <câu lệnh> do <điều kiện>; c. While <điều kiện> do <câu lệnh>;
b. While <giá trị cuối > do <giá trị đầu>; d. While <giá trị đầu> do <giá trị cuối>;
9. Trong lệnh lặp While... do của Pascal, nếu điều kiện đúng thì:
a. Tiếp tục vòng lặp c. Vòng lặp vô tận
b. Lặp 10 lần d. Thoát khỏi vòng lặp
10. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
a. x:=1; while x:= 10 do x:=x+5; c. x =1 while x>10 do x:=x+5;
b. x:=1; while x <10 do x:=x+5; d. x:=10; while x<10 do x=x+5;
Phần II. Bài tập. (5 điểm)
Câu 1: Cho đoạn chương trình sau: (2đ)

m:=2; k:=3;
For i:= 0 to 4 do begin

m:=m+1;
k :=k+m;
end;

Sau khi thực hiện đoạn chương trình trên giá trị của các biến m, k bằng bao nhiêu?
1. Câu 2: (3đ)Viết chương trình tính tổng: S= 1+ 1/2 + 1/3 + ….. + 1/N

(n là số nguyên được nhập từ bàn phím)

Làm giúp mình trước ngày 29/04/2020 nha !

1
27 tháng 4 2020

Cảm ơn ạ !haha

Phần II: Bài tập

Câu 1:

Sau khi thực hiện chương trình, chương trình sẽ báo lỗi thiếu begin

Câu 2:

uses crt;

var i,n:integer;

s:real;

begin

clrscr;

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

s:=0;

for i:=1 to n do

s:=s+1/i;

writeln(s:4:2);

readln;

end.

I. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất. Câu 1. Trong Pascal, câu lệnh nào sau đây được viết đúng? A. for i:= 4 to 1 do writeln(‘A’); B. for i= 1 to 10 writeln(‘A’); C. for i:= 1 to 10 do writeln(‘A’); D. for i to 10 do writeln(‘A’); Câu 2. Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j ); Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần? A. 10...
Đọc tiếp

I. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất.
Câu 1. Trong Pascal, câu lệnh nào sau đây được viết đúng?
A. for i:= 4 to 1 do writeln(‘A’); B. for i= 1 to 10 writeln(‘A’);
C. for i:= 1 to 10 do writeln(‘A’); D. for i to 10 do writeln(‘A’);
Câu 2. Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j );
Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); được thực hiện bao nhiêu lần?
A. 10 lần B. 5 lần C. 1 lần D. Không thực hiện.
Câu 3. Cho đoạn chương trình: J:= 0;
For i:= 1 to 5 do J:= j + i;
Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?
A. 12 B. 22 C. 15 D. 42.
Câu 4: Cú pháp của câu lệnh điều kiện dạng đủ nào sau đây là đúng?
A. If <điều kiện> then <câu lệnh 1> else <câu lệnh 2> B. If <câu lệnh> then <điều kiện>
C. If <điều kiện> then <câu lệnh 1> else <câu lệnh 2> D. If &lt;điều kiện&gt; do &lt;câu lệnh&gt;;
Câu 5: Chương trình sau cho kết quả gì?
Program VD;
Var a, b: Real; x: Integer;
Begin
Readln( a,b);
If a>b then x:=a else x:=b;
Writeln(x);
End.
A.Xuất ra màn hình số nhỏ nhất trong 2 số a, b đã nhập.
B.Xuất ra màn hình số lớn nhất trong hai số a, b đã nhập.
C.Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu.
D.Đảo giá trị của hai biến a, b cho nhau.
Câu 6: Hoạt động nào sau đây lặp với số lần lặp biết trước?
A. Rửa rau tới khi sạch B. Học bài cho tới khi thuộc bài
C. Gọi điện tới khi có người nghe máy D. Ngày tắm 2 lần
Câu 7: Cấu trúc câu lệnh điều kiện dạng thiếu là:
A. If <điều kiện> then <câu lệnh 1> esle <câu lệnh 2> B. If <điều kiện> then <câu lệnh >
C. If <điều kiện> then <câu lệnh 1> <câu lệnh 2> D. If <điều kiện> then <câu lệnh 1> esle <câu lệnh 2>
Câu 8: Ta có 2 lệnh sau:
x := 8;
IF x > 5 then x := x+1;
Giá trị của x nhận được là bao nhiêu?
A. 5 B. 7 C. 8 D. 9
Câu 9: Chọn câu lệnh Pascal hợp lệ trong các câu lệnh sau:
A. If a > b then max = a ; B. If a := b then max = b ;
C. If a = b then S := a+b ; D. If a <> b then b=a;
Câu 10: Chọn cú pháp đúng nhất về câu lệnh lặp:
A. for < biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
B. for < biến đếm > := < giá trị cuối > to < giá trị đầu > do <câu lệnh >

C. for <biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
D. for < biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
Câu 11: Em hiểu lệnh lặp theo nghĩa nào dưới đây?
A. Một lệnh thay cho nhiều lệnh B. Các câu lệnh được viết lặp đi lặp lại nhiều lần
C. Vì câu lệnh có tên là lệnh lặp D. Cả (A), (B), (C) đều sai
Câu 12: Khi nào thì câu lệnh For..to..do kết thúc?
A. Khi biến đếm nhỏ hơn giá trị cuối B. Khi biến đếm lớn hơn giá trị cuối
C. Khi biến đếm nhỏ hơn giá trị đầu D. Khi biến đếm lớn hơn giá trị đầu

Câu 13: Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng?
A. for i:=1 to 10; do x:=x+1; B. for i:=1 to 10 do x:=x+1;
C. for i:=10 to 1 do x:=x+1; D. for i =10 to 1 do x:=x+1;
Câu 14: Với ngôn ngữ lập trình Passcal câu lệnh lặp for i:=1 to 10 do x:=x+1; thì biến đếm i phải
được khai báo là kiểu dữ liệu nào?
A. Integer B. Real C. String D. Tất cả các kiểu trên đều được
Câu 15: Trong câu lệnh lặp với số lần biết trước (For – do), được thực hiện mấy lần?
A. ( < giá trị cuối > - < giá trị đầu >) lần B. Tuỳ thuộc vào bài toán mới biết được số lần
C. Khoảng 10 lần D. ( < giá trị đầu > - < giá trị cuối>) lần
Câu 16: Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 100
A. 1 B. 100 C. 99 D. Tất cả đều sai
Câu 17: Kết quả của &lt; điều kiện &gt; trong câu lệnh sẽ có giá trị là gì?
A. Là một số nguyên B. Là một số thực C. Đúng hoặc sai D. Là một dãy kí tự
Câu 18: Sau khi thực hiện đoạn chương trình sau:
S:=0; For i:=1 to 5 do S:=S+i; Giá trị của biến S bằng bao nhiêu?
A. 20 B. 15 C. 10 D. 0
Câu 19: Cú pháp lệnh lặp For – do dạng lùi:
A. for < biến đếm> = < Giá trị cuối >downto < Giá trị đầu > do < câu lệnh >
B. for < biến đếm> := < Giá trị cuối >downto < Giá trị đầu > do < câu lệnh >
C. for < biến đếm> = < Giá trị cuối >down < Giá trị đầu > do < câu lệnh >
D. for < biến đếm> := < Giá trị đầu >downto < Giá trị cuối > do < câu lệnh >
Câu 20: Trong lệnh lặp For – do: (chọn phương án đúng nhất)
A. Giá trị đầu phải nhỏ hơn giá trị cuối
B. Giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối
C. Giá trị đầu phải lớn hơn giá trị cuối D. Giá trị đầu phải bằng giá trị cuối
Câu 21: Lệnh lặp For – do được sử dụng khi:
A. Lặp với số lần biết trước B. Lặp với số lần chưa biết trước
C. Lặp với số lần có thể biết trước D. Lặp với số lần không bao giờ biết trước
Câu 22: Sau khi thực hiện đoạn chương trình sau: s:=1; for i:= 1 to 3 do s:= s*i;
Giá trị của biến s bằng bao nhiêu?
A. 10; B.5; C. 6; D. 15.
Câu 23: Với câu lệnh for i:=1 to 10 do x:=x+1; biến i được khai báo thuộc kiểu dữ liệu nào?
A. Real; B. Integer; C. String; D. Char.
Câu 24: Lệnh lặp for..to..do của Pascal trong mỗi vòng lặp, biến đếm thay đổi như thế nào?
A. Tăng thêm 1 đơn vị; B. +1 hoặc -1;
C. Giá trị bất kì; D. Một giá trị khác 0.

II: Bài tập: Tính tổng các số tự nhiên đầu tiên chia hết cho 3 không vướt quá N cho trước (N được
nhập vào từ bàn phím).

MONG NHẬN ĐƯỢC SỰ TRỢ GIÚP TỪ CÁC BẠN !!!

1

I: Trắc nghiệm

Câu 1: C

Câu 2: A

Câu 3: C

Câu 4: C

Câu 5: C

Câu 6: D

Câu 7: B

Câu 8: D

Câu 9: C

Câu 10: B

Câu 11: D

Câu 12: B

Câu 13: B

Câu 14: A

Câu 15: B

Câu 16: B

Câu 17: Không rõ câu hỏi

Câu 18: B

Câu 19: B

Câu 20: B

Câu 21: A

Câu 22: C

Câu 23: B

Câu 24: A

II: Bài tập:
uses crt;
var i,s,n:longint;
begin
clrscr;
write('n='); readln(n);
s:=0;
for i:=1 to n do
if i mod 3=0 then s:=s+i;
writeln('tong cac so tu nhien chia het cho 3 khong vuot qua ',n,' la: ',s);
readln;
end.

14 tháng 3 2017

o ở đâu v bạn

Câu 1 . Trong các tên dưới đây , tên hợp lệ trong Pascal là : A. Khoi 8 B. Ngay_20_11 C. 14tuoi D. Begin Câu 2 . Đại lượng được đặt tên dùng để lưu trữ dữ liệu , có giá trị không đổi trong suốt quá trình thực hiện chương trình được gọi là : A. Tên B. Từ khóa C. Biến D. Hằng Câu 3 . Trong Pascalm , từ khóa để khai báo biến là : A. Const B. Begin C....
Đọc tiếp

Câu 1 . Trong các tên dưới đây , tên hợp lệ trong Pascal là :
A. Khoi 8 B. Ngay_20_11 C. 14tuoi D. Begin
Câu 2 . Đại lượng được đặt tên dùng để lưu trữ dữ liệu , có giá trị không đổi trong suốt quá trình thực hiện chương trình được gọi là : A. Tên B. Từ khóa C. Biến D. Hằng
Câu 3 . Trong Pascalm , từ khóa để khai báo biến là :
A. Const B. Begin C. Var D. Uses
Câu 4 . Tính giá trị cuối cùng của c biết rằng : a:=3 ; b:=5 ; a:= a+b ; c:= a+b
A. c=8 B. c=3 C. c=5 D. c=13
Câu 5. Sau câu lệnh x:= 15 mod 2 ; Giá trị của biến x là :
A. 7 B. 6 C. 7.5 D. 1
Câu 6 . Hãy cho biết giá trị của biến X bằng bao nhiêu sau khi thực hiện câu lệnh if (45 mod 3) = 0 then X:=X+2 ; ( biết rằng trược đó giá trị của biến X = 5)
A. 5 B. 9 C. 7 D. 11
Câu 7 . Ta có 2 lệnh sau : x:=8 ; if x>5 then x:=x+1 ; giá trị của x là bao nhiêu ?
A. 5 B. 9 C. 8 D. 6
Câu 8 . Câu lệnh điều kiện đầy đủ là :
A. If < điều kiện > then < câu lệnh 1 > ; Elsse < câu lệnh 2 >
B. If < điều kiện > then < câu lệnh >
C. If < điều kiện > then < câu lệnh 1 > , < câu lệnh 2 >
D. If < điều kiện > then < câu lệnh 1 > ; Elsse < câu lệnh 2 > .

0
1.Câu lệnh Write('5'+'6') cho kết quả gì? 2.Khai báo Var a: integer; b: Char; có ý nghĩa gì? 3.Khai báo Var a: integer; b: String; có ý nghĩa gì? 4.Sau khi thực hiện đoạn lệnh Begin c:=a; a:=b; b:=c; End.Cho biết kết quả. 5.Giả sử a và b là 2 biến số.Hãy cho biết kết quả của việc thực hiện chương trình: a:=a+b; b:=a-b; a:=a-b; 6.Sau khi thực hiện đoạn lệnh: Begin a:=a+b; b:=a-b; a:=a-b; End.Cho biết kết quả 7.Kết quả của...
Đọc tiếp
1.Câu lệnh Write('5'+'6') cho kết quả gì?
2.Khai báo Var a: integer; b: Char; có ý nghĩa gì?
3.Khai báo Var a: integer; b: String; có ý nghĩa gì?
4.Sau khi thực hiện đoạn lệnh Begin c:=a; a:=b; b:=c; End.Cho biết kết quả.
5.Giả sử a và b là 2 biến số.Hãy cho biết kết quả của việc thực hiện chương trình: a:=a+b; b:=a-b; a:=a-b;
6.Sau khi thực hiện đoạn lệnh: Begin a:=a+b; b:=a-b; a:=a-b; End.Cho biết kết quả
7.Kết quả của phép toán a/b là...?
8.Trong câu lệnh điều kiện if....then....else có thể sử dụng ... lần?
9.Điều kiện sử dụng trong câu lệnh if...then...else có kết quả là ?
A.Chỉ đúng không sai B.Chỉ sai không đúng C.Chỉ có thể đúng hoặc sai D.Không đúng không sai
10.Sửa lỗi cho chương trình tính diện tích hình vuông sau:
Program bai1;
Uses crt;
Var canh integer;
Begin
Clscrs;
Writeln ('nhap canh:') reandln(canh)
dientich =canh*canh;
Writeln ('dien tich hinh vuong la:, dientich);
Readln;
End.

11.Sửa lỗi cho chương trình tính tổng
Program bai1;
Uses crt;
var a. b:integer;
Begin
Clscrs;
Writeln ('nhap a:') readln(a);
Writeln ('nhap b:'); readln(b)
Tong =a+b;
Writeln ('tong hai so a va b la:, tong);
Readln;
End.

12.viết câu lệnh so sánh 2 số a và b
13.Cho trước 3 số dương a,b,c.Viết chuong trình in ra ba số a,b,c có phải là độ dài của 1 tam giác hay không
14.Viết chương trình xét xem một tam giác có là tam giác cân hay không khi biết 3 cạnh của tam giác
15.Nhập 3 số a,b,c.Hãy viết chương trình tìm giá trị lớn nhất của
chúng và gắn giá trị lớn nhất đó cho biến MAX
16.Cho 3 biến a,b,c.Hãy viết chương trình hoán đổi 3 biến nói trên để a,b,c có thứ tự không tăng
17,Giải phương trình bậc nhất bx+c+0(với b,c được nhập từ bàn phím)
18,Cho 3 biến a,b,c.Hãy viết chương trình hoán đổi 3 biến nói trên để a,b,c có thứ tự không giảm
1
29 tháng 12 2017

c1: 5+6

c2: a là 1 số nguyên

b là 1 kí tự

c3: a là 1 số nguyên

b là 1 xâu kí tự

c4: hai số a,b được hoán vị cho nhau như vậy lúc này a mang giá trị của b, b mang giá trị của a. a=b,b=a

c5,6: tương tự câu 4

c7: kết quả là:a/b

c8: 1

c9: c

c10:

sai lệnh ' clscrs ' đúng là 'clrscr;

sau lệnh readln(canh) thiếu dấu ";"

chưa khai báo biến "dientich"

dòng writeln thứ 2 thiếu dấu " ' " ở trước dấu phẩy.

c11:

phần khai báo sai chỗ "a.b" đúng là "a,b"

sai lệnh clrscr;

thiếu ";" sau lệnh readln(b)

chưa khai báo biến tổng

câu lệnh in kết quả sai ( thiếu " ' ")

c12:

if a>b then { a lớn hơn b } else

if a<b then { a nhỏ hơn b } else

{ a bằng b }

c13: dễ nhưng hơi dài chỉ cần so sánh từng biến với tổng 2 biến còn lại là đươc

c14: bạn viết tương tự như c13 bổ sung thêm điều kiện

nếu có 2 trong 3 cạnh bằng nhau thì in ra là tam giác cân

c15:

max:=a;

if (max>b) and(max >c) then max:=a else

if b>c then max:=b else max:=c;

write(max)

c16: làm tương tự c4,5,6

c17: bx+x+0 ???

c18: làm tương tự c16

1.Em hiểu câu lệnh lặp nào trong pascal theo nghĩa nào sau đây ? A.câu lệnh lặp là câu lệnh được sử dụng để chỉ thị cho máy tính thực hiện cấu trúc lặp B.Một câu lệnh lặp có thể thay cho nhiều câu lệnh khác nhau C.câu lệnh lặp chỉ là tên của 1 loại câu lệnh trong pascal D.cả A,B và C đều sai 2.Trong câu lệnh lặp for<biến đếm>:=<giá trị đầu>to<giá trị cuối>do<câu lệnh>; thì biến đếm...
Đọc tiếp

1.Em hiểu câu lệnh lặp nào trong pascal theo nghĩa nào sau đây ?
A.câu lệnh lặp là câu lệnh được sử dụng để chỉ thị cho máy tính thực hiện cấu trúc lặp
B.Một câu lệnh lặp có thể thay cho nhiều câu lệnh khác nhau
C.câu lệnh lặp chỉ là tên của 1 loại câu lệnh trong pascal
D.cả A,B và C đều sai
2.Trong câu lệnh lặp for<biến đếm>:=<giá trị đầu>to<giá trị cuối>do<câu lệnh>; thì biến đếm thuộc kiểu dữ liệu gì?
A.kiểu kí tự.
B.kiểu số thực
C.kiểu số nguyên
D.kiểu số thực hoặc số nguyên

3.Trong câu lệnh For i:=1 to 20 do write (‘*’); số vòng lặp là:
A.1. B.19. C.20. D.21
4.câu lệnh nào dùng để in ra màn hình sau ‘Pascal’?
A.for i:=1 to 10 do writeln (‘Pascal’)
B. for i:=1 to 10 writeln (‘Pascal’)
C. for i:=1 to 10 do writeln (‘Pascal’); for i:=1 to 10 do writeln (Pascal);
5.câu lệnh nào dùng để in ra màn hình các số lẻ từ 1 đến 10?
A. for i:=1 to 10 do writeln (‘i’);
B. for i:=1 to 10 do writeln (i);
C. for i:=1 to 10 writeln (‘i’);
D. for i:=10 to 1do writeln (‘i’);

mấy bẹn xinh trai,gái đẹp giúp hộ mình nhe😇

1

Câu 1: D

Câu 2: A hoặc C

Câu 3: C

Câu 4: C

Câu 5: Sai hết

13 tháng 11 2018

Uses crt;

Var x: real; y: Integer;

Begin

x:= 10;

y:= 5/2;

y:= x+y;

Write('Y=',Y);

Bài này bạn làm sai nhiều lắm, k có End. r mấy câu gán x và y bị lặp nhau nói chung là bài làm này chưa đúng. Nếu k hiểu thì bạn đặt câu hỏi ra luôn r mình giải hộ cho. Chúc bạn học tốt !

13 tháng 11 2018

lỗi thứ 1:

uses ; crt ; ➝ uses crt;

lỗi thứ 2:

bạn đã khai báo y là số nguyên thì không thể thực hiện được phép chia 5/2 được nên phải khai báo y là số thực( mình chỉ giải thích thêm thôi)

nên sửa lại:

var x,y;real; hay Var x:real; y:real;

và thêm dấu chấm phẩy vào sau y:=5/2

lỗi thứ 3

phải thêm dấu hai chấm và dáu chấm phẩy vào y:=x+y;

nếu bạn để trùng cũng được bởi vì pascal chạy tuần tự từng câu lệnh

lỗi thứ 4:

thêm end vào cuối bài nữa nhé (nếu bạn muốn xem chương trình thì thêm readln trên end nhé)

nếu thiếu bỏ qua cho mình nhéhihi

15 tháng 12 2017

a. 15-8 >= 3
b. (20-15)*2 <> 25
c. 112 = 121
d. x > 10-3*x

17 tháng 12 2018

khùng

tự hỏi .tự trả lời