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.

30 tháng 12 2017

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 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

Bài tập 1: Hãy cho biết kết quả của đoạn chương trình sau: a) So:=1; While So<10 do writeln(So); So:=so+1; b) Hãy cho biết giá trị của x bằng bao nhiêu? x:=0;tong:=0; While tong<=20 do Begin writeln(tong); Tong:=tong+1; End; x:=tong; c) Hãy cho biết giá trị của i, j, k i:=1;j:=2;k:=3; While i<6 do i:=i+1;j:=j+1;k:=k+j; Bài tập 2: Hãy cho biết đoạn chương trình sau thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của A bằng bao nhiêu? Viết...
Đọc tiếp

Bài tập 1: Hãy cho biết kết quả của đoạn chương trình sau:

a) So:=1;

While So<10 do writeln(So);

So:=so+1;

b) Hãy cho biết giá trị của x bằng bao nhiêu?

x:=0;tong:=0;

While tong<=20 do

Begin writeln(tong);

Tong:=tong+1;

End;

x:=tong;

c) Hãy cho biết giá trị của i, j, k

i:=1;j:=2;k:=3;

While i<6 do i:=i+1;j:=j+1;k:=k+j;

Bài tập 2: Hãy cho biết đoạn chương trình sau thực hiện bao nhiêu vòng lặp? Kết thúc giá trị của A bằng bao nhiêu? Viết chương trình Pascal thể hiện thuật toán đó

a) Thuật toán 1

Bước 1: A ¬ 0; n ¬ 2;

Bước 2: Nếu A ≥ 9 , chuyển bước 4

Bước 3: A ¬ A+n và quay lại bước 2

Bước 4: Thông báo A và KTTT

b) Thuật toán 2

Bước 1. S ¬ 10, x ¬ 0.5

Bước 2. Nếu S £ 5.2, chuyển tới bước 4

Bước 3. S ¬ S - x và quay lại bước 2

Bước 4. Thông báo S và kết thúc thuật toán

Bài tập 3: Hãy chỉ ra lỗi trong các câu lệnh sau đây

a) X:=10; while X:=10 do X:=X+5;

b) X:=10; while X=10 do X=X+5;

c) S:=0; n:=0; while S<=10 do n:=n+1; S:=S+n;

Bài tập 4: Các khai báo biến mảng sau đây trong Pascal đúng hay sai:

a) var X: Array[10,13] Of Integer;

b) var X: Array[5..10.5] Of Real;

c) var X: Array[3.4..4.8] Of Integer;

d) var X: Array[10..1] Of Integer;

e) var X: Array[4..10] Of Real;

Bài tập 5: Viết chương trình nhập số thực nằm trong khoảng từ 1 đến 100. Thông báo bạn đã nhập đúng. Yêu cầu nhập lại nếu số đó không nằm trong khoảng này

Bài tập 6 : Viết chương trình nhập dãy N số và in ra tổng các số chẵn, số lẻ của dãy vừa nhập?

Bài tập 7 : Viết chương trình nhập 1 dãy số nguyên. In ra phần tử lớn nhất, nhỏ nhất của dãy số và tính tổng các số lớn hơn 10 và nhỏ hơn 200?

Bài tập 8 : Viết chương trình nhập 1 dãy số nguyên, sắp xếp lại dãy số theo thứ tự tăng dần, giảm dần?

Mọi người giúp em với em cảm ơn nhìu ạ.

2
2 tháng 5 2019

Lời giải :

Câu 1 :

a) So=1 (vô hạn lần)

b) In ra màn hình dãy số từ 1 đến 20

Câu 2 :

a) Vòng lặp chạy 3 vòng , A=12

Program hotrotinhoc;

var n,A: integer;

begin

n:=2; A:=0;

while A<9 do

begin

n:=n+1;

A:=A+n;

end;

write('A=',A);

readln

end.

b) Bạn xem lại đề nha

Câu 3 : ( ) = lỗi sai

a) X:=10; while X(:)=10 do X:=X+5;

b) X:=10; while X=10 do X(thiếu dấu :)=X+5;

c) S:=0; n:=0; while S<=10 do (thiếu begin) n:=n+1; S:=S+n; (thiếu end;)

Câu 4 :

a) var X: Array[10,13] Of Integer; (S)

b) var X: Array[5..10.5] Of Real; (S)

c) var X: Array[3.4..4.8] Of Integer; (S)

d) var X: Array[10..1] Of Integer; (S)

e) var X: Array[4..10] Of Real; (Đ)

Câu 5 :

program hotrotinhoc ;

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

i,n : integer ;

begin

write('Nhap do dai cua day :'); readln(n);

writeln('Nhap gia tri cua cac phan tu');

for i:= 1 to n do

begin

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

end;

for i:= 1 to n do

while (1>=a[i]) or (a[i]>=100) do

begin

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

end;

readln

end.

Bài 6 : Bạn tham khảo ở mục câu hỏi tương tự

Bài 7 :

Program hotrotinhoc;

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

i,n,min,max,tong : integer ;

begin

write('Nhap do dai cua day :'); readln(n);

for i:= 1 to n do

begin

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

end;

max:=a[1]; min:=a[1];

for i:= 2 to n do

begin

if a[i]>max then max:=a[i];

if a[i]<min then min:=a[i];

end;

write('so lon nhat la :',max);

write('So be nhat la:',min);

tong:=0;

for i:= 11 to 199 do tong:=tong+a[i];

write('Tong la :',tong);

readln

end.

2 tháng 5 2019

Câu 8 :

Tăng dần : Câu hỏi của my tra - Tin học lớp 8 | Học trực tuyến

Giảm dần : Câu hỏi của nguyễn minh nguyệt - Tin học lớp 8 | Học trực tuyến

12 tháng 6 2020

Bài 1: S=15

Bài 2: S=17

Bài 3:

1)X:=10; while X:=10 to X:(thiếu dấu '=') X+5;

2) X:=10; while X = 10 do X(thiếu dấu ';') =X+5 (thiếu dấu ';')

3) S:=0; n:=0; while S <= 10 do (thiếu 'begin') n:(thiếu dấu '=')n+1 ,(để kết thúc đoạn lệnh dùng dấu ';' không phải dấu ',') S:= S+n; (thiếu end;)

Câu 3: 

\(2S=2+2^2+2^3+...+2^{10}\)

nên \(S=2^{10}-1\)

\(5\cdot2^8=256\cdot5=1280>1023=2^{10}-1\)

Do đó: \(S< 5\cdot2^8\)

27 tháng 6 2019

1

a/ For i:=1,5 to 10.5 do s:=s+i;

=> For i:=1 to 10 do s:=s+i;

b/ Var X : array [100..1] of integer;

=>Var X : array [100..1] of integer;

c/ X:=1 ; while X:=10 do X:=X+5;

=>X:=1 ; while X=10 do X:=X+5;

d/For i:=1 to n do begin s:=s+i ; i:=i-1;

=>For i:=1 to n do begin s:=s+i ; i:=i-1;end;

2

a) X:ARRAY[1..50]OF INTEGER;

B) A[9]:=5;

C)DIEMTIN:ARRAY[1..100] OF REAL;

D) WRITE('DIEM TIN[5]:');READLN(DIEMTIN[5]);

31 tháng 3 2017

Đáp án A

Bài toán cần 5 điểm cực trị => Tổng số nghiệm của (1) và (2) phải là 5

Đối với (1) => số nghiệm chính là số điểm cực trị. Nhìn vào đồ thị => có 3 cực trị

=> Phương trinh (2) phải có 2 nghiệm khác 3 nghiệm trên. Nhìn vào đồ thị ta thấy

12 tháng 10 2019

a) 2 lỗi

- thiếu do

- vòng lặp for tuyệt đối không có ;

b: sau writeln('A') không có chấm phẩy

c: sai chỗ y:=10

phải là y=10 mới đúng

d: sử dụng 2 chấm phẩy là sai

sau while do nếu có từ 2 lệnh trở lên phải bao bọc trong begin end

e: thiếu dấu : sau i, đi từ 100 tới 20 là sai,

phải là for i:=100 downto 20 do mới đúng

f: không sai

17 tháng 6 2018

10 tháng 6 2017

Bài 1:

Tổng các chữ số của \(A\)\(9n\)

\(A^2=99...9800...01\left(n-1\text{ chữ số }9\text{ và chữ số }0\right)\)

Vậy tổng các chữ số của \(A^2\)\(\left(9+0\right)\left(n-1\right)+8+1=9\left(n-1\right)+9=9\left(n-1+1\right)=9n\)

Vậy tổng các chữ số của \(A\) bằng tổng các chữ số của \(A^2\) .

15 tháng 5 2022

\(\text{Đặt f (x)= a.cos2x+b.sinx+cosx}\)

\(\text{Hàm f (x) xác định và liên tục trên R}\)

\(\text{f ( π /4 ) = b √2 /2 + √2 /2 }\)

\(\text{f ( 5/π4 ) = − b √ 2/ 2 − √ 2/ 2 }\)

\(\text{⇒ f (π /4) . f ( 5 π/ 4 ) = − 1/2 ( b + 1 )^ 2 ≤ 0 ; ∀ a ; b ; c}\)

\(⇒ f (x)= 0 luôn có ít nhất 1 nghiệm thuộc đoạn [ π /4 ; 5π/4]\)

Hay pt đã có nghiệm. 

15 tháng 5 2022