1. Em hãy cho biết chương trình sau đây hiển thị kết quả gì?
Var
j, k: integer;
Begin
k : = 0;
for j : = 1 to 5 do k : = k + 1;
writeln(j : 4, k : 4);
readln;
End.
Những câu hỏi liên quan
Cho chương trình sau:
Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết lệnh writeln(j,k) sẽ in ra màn hình giá trị của j,k là bao nhiêu?
j:=2;k:=3;
for i:=1 to 5 do j:=j+2;
k:=k+j;
Writeln(j,k)
Giúp mình với!
Cảm ơn nhiều!
Xem chi tiết
Màn hình sẽ in ra giá trị: 3 7
Giải thích:
Câu lệnh if i mod 3=0 then j:=j+1 có nghĩa là j bằng một cộng với số các số chia hết cho 3.
k:=k+j có nghĩa là k bằng bốn cộng với giá trị của j đã tìm.
For i:=1 to 5 do => có 5 vòng lặp, các vòng sẽ có gtri j,k tương ứng là:
vòng 1: 4,7
vòng 2: 6,13
vòng 3:8,21
vòng 4: 10,31
vòng 5: 12;43
Vậy writeln(j,k) sẽ in ra 12 43. Ở đây vòng lặp không có điều kiện trước đó nên không cần xét nhé!
Bài 1 : đối với từng đoạn chương trình Pascal sau đây ,cho biết lệnh writeln in ra màn hình giá trị của j và k là biến.Đoạn chương trình 1:j:2;k:3;for i:1 to 5 do j:j+1;k:k+j;cach: ;writeln(j,cach,k);Đoạn chương trình 2:j:2; k:3;for i: 1 to 5 dobegin j:j+1;k:k+j; end; cach: ; writeln(j,cach,k);đoạn chương trình 3:j:2;k:3;for i:1 to 5 do then j:j+1;k:k+j;cach: ;writeln(j,cach,k);
Đọc tiếp
Bài 1 : đối với từng đoạn chương trình Pascal sau đây ,cho biết lệnh writeln in ra màn hình giá trị của j và k là biến.
Đoạn chương trình 1:
j:=2;k:=3;
for i:=1 to 5 do j:=j+1;
k:=k+j;
cach:=' ' ;
writeln(j,cach,k);
Đoạn chương trình 2:
j:=2; k:=3;
for i:= 1 to 5 do
begin
j:=j+1;k:=k+j;
end;
cach:=' ';
writeln(j,cach,k);
đoạn chương trình 3:
j:=2;k:=3;
for i:=1 to 5 do then j:=j+1;
k:=k+j;
cach:=' ';
writeln(j,cach,k);
Câu 2. j: 4; k:4;For i:1 to 4 do begin j:j+i; k:k+j; end;writeln( j, k); a) Cho biết giá trị của k, j sau khi thực hiện đoạn chương trình trên?b) Viết đoạn chương trình thể hiện thuật toán trên?Câu 3. Viết chương trình tính tổng các số chẵn (hoặc lẻ) từ 1 đến 100 sử dụng câu lệnh for...do?Câu 4. Viết chương trình tính tổng của N số tự nhiên đầu tiên với N là số tự nhiên nhập từ bàn phím.Câu 5. Viết chương trình tính tổng các số tự nhiên từ 1 đến 100 sử dụng câu lệnh lặp while...do.
Đọc tiếp
Câu 2. j:= 4; k:=4;
For i:=1 to 4 do begin j:=j+i; k:=k+j; end;
writeln( j, k);
a) Cho biết giá trị của k, j sau khi thực hiện đoạn chương trình trên?
b) Viết đoạn chương trình thể hiện thuật toán trên?
Câu 3. Viết chương trình tính tổng các số chẵn (hoặc lẻ) từ 1 đến 100 sử dụng câu lệnh for...do?
Câu 4. Viết chương trình tính tổng của N số tự nhiên đầu tiên với N là số tự nhiên nhập từ bàn phím.
Câu 5. Viết chương trình tính tổng các số tự nhiên từ 1 đến 100 sử dụng câu lệnh lặp while...do.
Cau 4:
#include <bits/stdc++.h>
using namespace std;
long long n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++) t+=i;
cout<<t;
return 0;
}
Câu 5:
uses crt;
var i,t:integer;
begin
clrscr;
t:=0;
i:=0;
while i<=100 do
begin
i:=i+1;
t:=t+i;
end;
writeln(t);
readln;
end.
Đúng 1
Bình luận (0)
Câu 6: Cho biết kết quả in ra màn hình của đoạn chương trình sauCâ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);Câu b)n : 127;m : 0;While n 0 doBegin m : m * 10 + n mod 10; n : n div 10;end;writeln(m);
Đọc tiếp
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);
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);
a/
Giá trị đầu của vòng lặp là 1, giá trị cuối là 5 => biến đếm của k lần lượt tăng thành 1 dãy số 1,2,3,4,5
k mod 2 =0 -> nếu k là số chẵn thì biến i tăng lên 1 đơn vị. Dãy số gồm 2 số chẵn (2,4) => i tăng 2 đơn vị => i = -1 + 1 + 1 = 1
j = j + i => j = 20 + 1 = 21
Vậy i=1; j=21
b/
Lần lặp thứ nhất: m=0*10 + 7 = 7 ; n = 12
Lần lặp thứ 2: m=7*10 + 2 = 72; n= 1
Lần lặp thứ 3: m=720 + 1 = 721; n=0 (n=0 => dừng vòng lặp)
Vậy m=721
Đúng 1
Bình luận (0)
Bài 1 : đối với từng loại chương trình Pascal sau đây , cho biết lệnh writeln giá trị của j và của k là biến
đoạn chương trình 1 :
j:2;k:3;
for i:1 to 5 do j:j+1;
k:k+j;
cach:_;
writeln(j,cach,k);
đoạn chương trình 2 :
j:2;k:3;
for i:1 to 5 do
begin j:j+1;k:k+j;end;
cach:_;
writeln(j,cach,k);
đoạn chương trình 3:
j:2;k:3;
for i:1 to 5 do
if 1 mod 2 0 then j:j+1;
k:k+j;
cach:_;
writeln(j,cach,k);
Đọc tiếp
Bài 1 : đối với từng loại chương trình Pascal sau đây , cho biết lệnh writeln giá trị của j và của k là biến
đoạn chương trình 1 :
j:=2;k:=3;
for i:=1 to 5 do j:=j+1;
k:=k+j;
cach:=_;
writeln(j,cach,k);
đoạn chương trình 2 :
j:=2;k:=3;
for i:=1 to 5 do
begin j:=j+1;k:=k+j;end;
cach:=_;
writeln(j,cach,k);
đoạn chương trình 3:
j:=2;k:=3;
for i:=1 to 5 do
if 1 mod 2 =0 then j:=j+1;
k:=k+j;
cach:=_;
writeln(j,cach,k);
Đoạn chương trình 1: j=7; k=10
Đoạn chương trình 2: j=7; k=28
Đoạn chương trình 3: j=4; k=7
Đoạn chương trình 1: j=7; k=10
Đoạn chương trình 2: j=7; k=28
Đoạn chương trình 3: j=4; k=7
Đối với từng đoạn chương trình Pascal sau đây, hãy cho biết lệnh writeln in ra màn hình giá trị của i , j, k là bao nhiêu?
i:=1; j:=2; k:=3;
while i<6 do i:=i+1; j:=j+1; k:=k+j;
writeln(i,’ ’, j,’ ’, k);
Giá trị của j, k sau khi thực hiện đoạn chương trình là?
Giá trị của j là 7
Giá trị của k là 28
Đúng 0
Bình luận (1)
Câu lệnh while do không ảnh hưởng đến j và k
j = 2 nên j = j + 1 = 3
k = 3 nên k = k + j = 3 + 3 = 6
Đúng 1
Bình luận (0)
Câu 36. Cho đoạn chương trình: i:1; j:2; k:3;While i6 do i:i+1; j:j+1; k:k+j;Writeln (i, j, k);Sau khi thực hiện đoạn chương trình trên i, j, k có kết quả làA. 6;3;6B. 6;6;12C. 6;7;12D. 6;7;28
Đọc tiếp
Câu 36. Cho đoạn chương trình:
i:=1; j:=2; k:=3;
While i<6 do i:=i+1; j:=j+1; k:=k+j;
Writeln (i, j, k);
Sau khi thực hiện đoạn chương trình trên i, j, k có kết quả là
A. 6;3;6
B. 6;6;12
C. 6;7;12
D. 6;7;28
cho đoạn chương trình sau : j:= 2 ; k:= 3 ; For i:= 1 to 5 do j:= j+2; k:= k+3 lệnh writeln( j;k ) làm giá trị của j; k là bao nhiêu?? Giúp mik với ạ :(((((
Với từng đoạn chương trình, hãy cho biết lệnh Writeln in ra màn hình giá trị của J, k là bao nhiêu?
Đoạn chương trình 1:
J:2; k:3;
For i:1 to 5 do J:J+1;
k: k+J;
writeln(J,’ ‘, k);
Đoạn chương trình 2:
J:2; k:3;
For i:1 to 5 do
Begin J:J+1;k: k+J; end;
writeln(J,’ ‘, k);
Đọc tiếp
Với từng đoạn chương trình, hãy cho biết lệnh Writeln in ra màn hình giá trị của J, k là bao nhiêu?
Đoạn chương trình 1:
J:=2; k:=3;
For i:=1 to 5 do J:=J+1;
k:= k+J;
writeln(J,’ ‘, k);
Đoạn chương trình 2:
J:=2; k:=3;
For i:=1 to 5 do
Begin J:=J+1;k:= k+J; end;
writeln(J,’ ‘, k);
Đoạn chương trình 1:
j=7
k=10
Đoạn chương trình 2:
j=7
k=28