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

C, F?

31 tháng 5 2022

C

2 tháng 3 2022

@@@@

a) Sai vì giá trị đầu lớn hơn giá trị cuối

b) Sai vì giá trị đầu lớn hơn giá trị cuối

b) Sai vì sau câu lệnh i:=1+1 thiếu dấu chấm phẩy

HT

tham khảo ''

a) Sai vì giá trị đầu lớn hơn giá trị cuối

b) Sai vì giá trị đầu lớn hơn giá trị cuối

b) Sai vì sau câu lệnh i:=1+1 thiếu dấu chấm phẩy

nha

hok tốt nha

ok nha

14 tháng 8 2018

a) Thừa dấu hai chấm trong điều kiện;

b) Thiếu dấu hai chấm trong câu lệnh gán;

c) Thiếu các từ khóa begin và end trước và sau các lệnh n:=n+1; S:=S+n, do đó vòng lặp trở thành vô tận.

23 tháng 3 2023

A/ Không vì giá trị đầu > giá trị cuối

B/ Hợp lệ (nhưng lỗi  x:=x+5; không phải x=x+5)

A ko hợp lệ vì 5>1

B ko hợp lệ vì chỗ gán thiếu dấu :

a) if a>b then max:=a; else max:=b;b) var X: Array[5..10] Of Real; c) X:=10; while X:=10 do X := X+5; d) for  i:=1.5 to 10 do m:=m + 1;e) if a>b then max:=a else max:=b;f) var X: Array[5.5..10] Of Real; g) X:=10; while X>10 do X := X+5; h) for  i:=1.5 to 10 do m:=m + 1;III. Hãy viết các câu lệnh, khai báo theo yêu cầu sau: A. Khai báo mảng A gồm 50 phần tử thuộc kiểu dữ liệu số thực.B. Phần tử thứ  5 của mảng A được gán giá trị là 8.C. Khai báo mảng dayso gồm...
Đọc tiếp

a) if a>b then max:=a; else max:=b;

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

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

d) for  i:=1.5 to 10 do m:=m + 1;

e) if a>b then max:=a else max:=b;

f) var X: Array[5.5..10] Of Real;

g) X:=10; while X>10 do X := X+5;

h) for  i:=1.5 to 10 do m:=m + 1;

III. Hãy viết các câu lệnh, khai báo theo yêu cầu sau:

A. Khai báo mảng A gồm 50 phần tử thuộc kiểu dữ liệu số thực.

B. Phần tử thứ  5 của mảng A được gán giá trị là 8.

C. Khai báo mảng dayso gồm 50 phần tử thuộc kiểu dữ liệu số nguyên.

D. Nhập giá trị cho phần tử thứ 2 trong mảng diem.        

IV. Bài tập

 Viết chương trình thực hiện các yêu cầu sau:

a.    Nhập điểm văn và điểm toán của n học sinh trong một lớp (n nhập từ bàn phím)

b.    Tính điểm trung bình của mỗi học sinh (kết quả lấy 1 chữ số thập phân)

help với mai ktr ;-;

 

1

III:
A: var a:array[1..50]of real;

B: a[5]:=8;

C: var a:array[1..50]of integer;

D: readln(dem[2]);

10 tháng 5 2021

a) thiếu dấu ; ở cuối 

sửa: for i:=1 to 10 do writeln ('A');

b) sau X ko phải có; mà có : từ 5.. 10 có 2 dấu chấm dư 1 dấu

sửa: var X: array [5..10] of char;

b) thiếu  dấu ; ở cuối câu lệnh

sửa: X:=10; while X=10 do X:=X+5;

d) giá trị đầu và gia trị cuối của câu lệnh phải là só nguyên

sửa: for i:=1 to 10 do writeln('A');

10 tháng 5 2021

chắc ko

 

14 tháng 4 2020

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

----> lỗi sai: Thừa 2 dấu ';' ở sau while và ở sau do (lỗi sai trong ngoặc)

----> sửa lại :X:= 5 while X <= 5 do X:= X + 5;

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

----> lỗi sai : Sai lệnh gán X=10.

----> sửa lại : X:= 10; while X = 10 do X:= X + 5;

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

Về cấu trúc không sai nhưng để như vậy sẽ thành vòng lặp vô hạn.

----> lỗi sai : thiếu begin ... end; ở sau câu lệnh lặp

----> sửa lại : S:= 0; n:=0; while S <= 10 do begin S:=S + n ; n:=n+1; end;