Trong các câu lệnh sau, câu nào sai, nếu sai hãy giải thích và sửa lại cho đúng:
a) Var h b: integer;
b) Var x:real;
c) Const y = 4;
d) Const r:2;
e) If x:=y then x = x - y;
f) If a = b then write(a,'bang',b) else; write(a,'khac',b);
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.
Những câu hỏi liên quan
19 tháng 4 2021
câu 1:
a)for i:=17 to 109 do writeln('a');
b)for i:=1 to 10 do x:=x+1;
c)s:=7;
while s<=15 do
begin
n:=n+s;
s:=s+1;
end;
d)var a:array[1..100] of real;
câu 2:
program tihn_tong;
uses crt;
var s,i:integer;
begin
clrscr;
i:=1;s:=1000;
while i<=21 do
begin
s:=s+1000+i;
i:=i+1;
end;
writeln(s);
readln;
end.
câu 3:
cú pháp của lệnh for...to...do:
for<biến đếm>:=<giá trị đầu>to<giá trị cuối>do<công việc>
cú pháp của lệnh while...do:
while<điều kiện>do<công việc>
câu 4:
cú pháp khai báo biến mang trong chương trình pascal:
khai báo trực tiếp:
var <biến mảng>:array[chỉ số]of <kiểu dữ liệu>
khai báo gián tiếp:
type <biến mang> =array[chỉ số]of <kiểu dữ liệu>
help me
17 tháng 5 2022
a: \(\widehat{P}=180^0-80^0-60^0=40^0< \widehat{N}< \widehat{M}\)
nên MN<MP<NP
c: Đúng
d: Sai vì chỉ có tâm đường tròn ngoại tiếp cách đều 3 đỉnh thôi
17 tháng 2 2019
CTHH viết sai:
KO => \(K_2O\)
\(BaO_2\) => BaO
\(Fe_2O\) => FeO, \(Fe_2O_3\) , \(Fe_3O_4\)
TT
17 tháng 2 2019
\(KO\rightarrow K_2O\)
\(Fe_2O\rightarrow FeO-Fe_2O_3-Fe_3O_4\)
Câu e sai vì trong phần điều kiện không thể có dấu gán ':='
Câu f sai vì sau else chưa hết câu mà đã có dấu chấm phẩy
và Write phải chuyển thành Writeln và chu 'bang' chuyen thanh' = ' và 'khac' chuyển thành '\(\ne\)'
câu f bạn sai nặng nề lun đó, trong ngôn ngữ pascallafm j có dấu âsy