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 lệnh lặp P:=10; For x:=1 to 5 do P:=P-x; Xác định câu lệnh
A. x
B. 5
C. P:=P-x
D. 1
Câu lệnh điều kiện dạng dạng thiếu:
* Cú pháp :
If (điều kiện) then ( câu lệnh);
* Hoạt động của câu lệnh : Khi gặp câu lệnh điều kiện này, chương trình sẽ kiểm tra điều kiện, nếu kiều kiện được thỏa mản chương trình sẽ thực hiện câu lệnh ,ngược lại câu lệnh bị bỏ qua.
Câu lệnh điều kiện dạng dạng đủ:
*cú pháp :
If (điều kiện) then ( câu lệnh 1) alse (câu lệnh 2);
* hoạt động của câu lệnh: Chương trình sẽ kiểm tra điều kiện, nếu điều kiện được thỏa mãn , chương trình sẽ thực hiện câu lệnh 1, ngược lại, câu lệnh 2 sẽ được thực hiện.
Vd:
câu lệnh điều kiện dạng thiếu :
Nếu trời mưa (điều kiện) thì lớp em sẽ nghỉ tiết thể dục. ( Câu lệnh)
câu lệnh điều kiện dạng đủ:
Nếu a >b ( điều kiện) thì in ra màn hình số a (câu lệnh 1), ngược lại thì in ra màn hình số b. ( câu lệnh 2)
Theo ý hiểu của mình:
+) Readln; là một câu lệnh đặc biệt, ko có biến để nhận ở đằng sau, vị trí ở cuối chương trình. Công dụng ra khi ta chạy chương trình, kết quả sẽ hiện ra màn hình.
+)Readln(danh sách biến); theo kiểu sau khi khai báo biến xong, mình phải dùng đến lệnh này để sử dụng biến đó.
Ví dụ:
uses crt;
var a,b : real; (đây là khai báo biến)
BEGIN
clrscr;
write('nhap vao so a'); (a); (đây là in ra màn hình dòng "nhap vao so a" sau đó nó cho mình nhập vao biến a.)
write('nhap vao so b'); (b);
.........
Chỉ theo ý hiểu, có thể không đúng về lý thuyết nhưng sẽ đúng về mặt thực hành, hoặc ít nhất mk nghĩ vậy^^
Thanks
@@@@
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
chỉ cho em câu này đi
Câu 6: Cho biết kết quả in ra màn hình của đoạn chương trình sau
Câu a)
i := -1;
j:= 20;
For k:= 1 to 5 do
If k mod 2 = 0 then i:= i + 1;
j := j + i;
Writeln(i,‘ ’,j);
=>chương trình bị lỗi
Câu b)
n := 127;
m := 0;
While n < >0 do
Begin
m := m * 10 + n mod 10;
n := n div 10;
end;
writeln(m);
Câu 1: Trong câu lệnh lặp For i :=1 to 10 do begin .... end ; câu lệnh ghép được bao nhiêu lần ?
A. 20 lần B. 1 lần C. 2 lần D. 10 lần
Câu 2: Tìm giá trị của S trong đoạn chương trình dưới đây ?
S :=1 ;
For i: = 1 to 5 do S := S*i
A. S = 120 B. S = 240 C. S = 24 D. S = 10
Câu 3: Tìm giá trị của S trong đoạn chương trình dưới đây ?
S :=1 :
For i:= 1 to 5 do S := S + 1
A. S = 10 B. S = 16 C. S = 18 D. S = 14
Câu 4: Câu lệnh for i: 1 to 10 do writeln ('A') ; không hợp lệ vì
A. Giá trị đầu cuối không hợp lệ B. Thiếu dấu = ở phép gán giá trị cho biến
C. Thừa dấu : ở phép gán giá trị cho biến D. Không có đáp án nào đúng
Câu 5: Trong câu lệnh lặp For .... to ....do của Pascal , trong mỗi vòng lặp , biến đếm thay đổi thay đổi như thế nào ?
A. + 1 B. + 1 hoặc - 1 C. Một giá trị bất kì
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)
Câu 1 :
a) (a+b)*(a+b)*(d+e)
b) a*x*x+b*x*x+c*x
Câu 2: Mình không hiểu đề lắm? Đặt cái gì cơ?
Câu 3:
Uses crt;
Var S,a,b:real;
Begin
clrscr;
Writeln('Nhap chieu dai a = '); Readln(a);
Writeln('Nhap chieu rong b = '); Readln(b);
S := a*b;
Write('Dien tich hinh chu nhat la ', S );
Readln;
End.
xin lỗi mk lộn nêu qui tắc đặt ngôn ngữ lập trình trong pascal
sua lai nhu sau:
a) if x=5 then a = b; sai vi sau if la 1 phep so sanh
b) if x>2 then a:=b; sai vi sau if x>2 phai bo dau ;
c) if x>5 then a:=b; m:=n; dung
d) if x>2 then a=b else m:=n; sai vi phai bo dau ; sau then a=b
a, sai vi sau if ko phai phep so sanh
b, sai. vi phai bo dau ; sau if x>2
c, dung
d, bo dau ; sau then a=b
câu 1 : A
câu 2 : thì chịu :0
sưa chớ đâu phải chon trắc nghiêm đâu bạn