Phần mềm học tập
Các câu hỏi tương tự
Số lần lặp của câu lệnh S:=S+1; sau là bao nhiêu lần?
For i:= 3 to 7 do
S:=S+1;
A.3 B.7 C.4 D.5
GIÚP MIK VS !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Em hãy sắp xếp chương trình tính tổng N số tự nhiên sau cho phù hợp?
Var N, i: integer;
Write(‘Nhap so N=’); s:=0;
S: Longint; readln(n);
For i:=1 to n do
Begin
Program tinh_tong;
S:=s+i;
Writeln(‘Tong cua ‘, N, ‘ So tu nhien dau tien s=’, s);
End.
Readln
Cho đoạn chương trình dưới đây. Hãy chỉ ra những lỗi sai và sửa lại cho đúng.
Program tinhtong.
Var N, i:=integer
Begin
Write(‘nhap so N =’)
Readln(N)
S=0
For i= 1 to N do S= S+i
Writeln(‘Tong cua ‘,N,’ so tu nhien dau tien S=’,S)
Readln
End
Nêu cú pháp của câu lệnh lặp với số lần chưa biết trước. Giải thích các thành phần, vẽ sơ đồ hoạt động của câu lệnh
Hãy cho biết trong đoạn chương trình sau chương trình thực hiện bao nhiêu vòng lặp?
N:= 0; s:=0
While s<=10 do
Begin
N:=n+1; s:=s+n;
End.
Giúp mk nha mn. Mơn nhiều ạ!
Trong Pascal, câu lệnh lặp với số lần chưa biết có cú pháp:
cho a và b là hai số nguyên dương.Ta gọi tổng đối xứng của a và b là số đối xứng với tổng của số dối xứng với a và số đối xứng với b.Viết chương trình cho phép nhập hai số nguyên dương a,b và in ra tổng đối xứng của chúng
Vd:nếu a25 và b26 thì tổng số đối xứng với a và số đối xứng với b là 52+62114.vì thế tổng đổi xứng của a và b là 411.
Đọc tiếp
cho a và b là hai số nguyên dương.Ta gọi tổng đối xứng của a và b là số đối xứng với tổng của số dối xứng với a và số đối xứng với b.Viết chương trình cho phép nhập hai số nguyên dương a,b và in ra tổng đối xứng của chúng
Vd:nếu a=25 và b=26 thì tổng số đối xứng với a và số đối xứng với b là 52+62=114.vì thế tổng đổi xứng của a và b là 411.
Cùng các bạn trong nhóm thảo luận và trả lời câu hỏi sau:
Xét chương trình sau:
Const
a20;
d TRUE
Var
b: integer; x: real; c: char:
Begin
write ( Hay nhap gia tri cho b: ) ; readln(b) ;
write ( Hay nhap gia tri cho c: ) ; readln(c) ;
...
readln;
End.
Khi thực hiện chương trình, nếu người sử dụng giá trị 18 cho biến b và nhập kí tự k cho biến c thì từng lệnh dưới đây sẽ hiển thị kết quả gì lên màn hình khi đc thay vào chỗ dấu 3 chấm ?(không sử dụng Free Pascal để chạy thử)
Lệnh 1. wr...
Đọc tiếp
Cùng các bạn trong nhóm thảo luận và trả lời câu hỏi sau:
Xét chương trình sau:
Const
a=20;
d= TRUE
Var
b: integer; x: real; c: char:
Begin
write (' Hay nhap gia tri cho b: ') ; readln(b) ;
write (' Hay nhap gia tri cho c: ') ; readln(c) ;
...
readln;
End.
Khi thực hiện chương trình, nếu người sử dụng giá trị 18 cho biến b và nhập kí tự 'k' cho biến c thì từng lệnh dưới đây sẽ hiển thị kết quả gì lên màn hình khi đc thay vào chỗ dấu 3 chấm ?(không sử dụng Free Pascal để chạy thử)
Lệnh 1. writeln ( (36-5*2) div 3) ;
Lệnh 2.writeln ( (8 mod 3) <> 2);
Lệnh 3. writeln (b/6) ;
Lệnh 4. writeln (b/6 :10:2) ;
Lệnh 5. writeln (a/6:10:2) ;
Lệnh 6. writeln (b/6<=a/5) ;
Lệnh 7. writeln (c='K') ;
Lệnh 8. writeln (d) ;
Em hãy dùng Free Pascal để kiểm tra lại ý kiến của mình trong bài tập trên
Câu 1: Giả sử có khai báo sau, Var X, Y, Z:integer;Và có giá trị lần lượt là X: 2; Y: 6; Z: 3;Thì phép gán nào dưới đây không hợp lệ?A) X: Y + Z; B) X: Y –Z; C) X: Y*Z; D) X: Y/Z;Câu 2: X có kết quả bao nhiêu sau khi thực hiện đoạn lệnh sau:Y: 345;X: Y mod 10 + Y div 10 + Y div 100;A) 5 B) 42 C) 12 D) 39
Đọc tiếp
Câu 1: Giả sử có khai báo sau,
Var X, Y, Z:integer;
Và có giá trị lần lượt là X:= 2; Y:= 6; Z:= 3;
Thì phép gán nào dưới đây không hợp lệ?
A) X:= Y + Z; B) X:= Y –Z; C) X:= Y*Z; D) X:= Y/Z;
Câu 2: X có kết quả bao nhiêu sau khi thực hiện đoạn lệnh sau:
Y:= 345;
X:= Y mod 10 + Y div 10 + Y div 100;
A) 5 B) 42 C) 12 D) 39