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 1: S = 10
Câu 2: Chữ "xin chao" được in ra màn hình 3 lần
Câu 3:
- For...to...do:
+ Là câu lệnh lặp với số lần lặp biết trước.
+ Điều kiện kết thúc vòng lặp là một số xác định.
- While...do:
+ Là câu lệnh lặp với số lần lặp chưa biết trước.
+ Điều kiện để kết thúc vòng lặp thường là một phép so sánh.
n:=0;
for i:= 1 to 10 do n:=n+i;
Giải thích : n:=n+i nghĩa là giá trị ban đầu cộng lần lượt với i ( dãy số từ 1 đến 10) n sẽ thay đổi giá trị sau mỗi lần cộng
Hoạt động của câu lệnh :
Vòng 1 : n:=n+i; <=> n=0+1=1;
Vòng 2: n:=n+i <=> n=1+2=3 ;
Vòng 3 : n:=n+i <=> n=3+3=6;
Vòng 4: n:=n+i <=> n=6+4=10;
Vòng 5 : n:=n+i <=> n=10+5=15;
Vòng 6 : n:=n+i <=> n=15+6=21;
Vòng 7: n:=n+i <=> n=21+7=28;
Vòng 8 : n:=n+i <=> n=28+8=36;
Vòng 9 : n:=n+i <=> n=36+9=45;
Vòng 10 : n:=n+i <=> n=45+10=55;
Vậy đoạn chương trình trên có giá trị n=55
a) Vòng lặp while thực hiện 5 vòng lặp:
Vòng thứ nhất s=0 => n=1, s=1;
Vòng thứ hai s=1 => n=2, s=3;
Vòng thứ ba s=3 => n=3, s=6;
Vòng thứ tư s=6 => n=4, s=10;
Vòng thứ năm s=10 => n=5, s=15 kết thúc vòng lặp.
=> Vòng while sẽ kết thúc khi giá trị của s thay đổi không đáp ứng điều kiện tiếp tục vòng.
b) Vòng lặp while thực hiện vô hạn lần.
=> Giá trị của s luôn thỏa mãn điều kiện tiếp tục vòng while vì trong vòng while không thấy sự thay đổi của biến s (s luôn bằng 0 bé hơn 10).
Câu 2.
Program HOC24;
var i,n: integer;
a: array[1..32000] of integer;
begin
write('Nhap so ban lam bai thi hoc ki tin : '); readln(n);
for i:=1 to n do
begin
write('Nhap diem kiem tra hoc ki Tin cua ban thu ',i,' :'); readln(a[i]);
end;
writeln(n);
for i:=1 to n do write(a[i],' ');
readln
end.
Câu 1.
* Cú pháp : while <điều kiện> do <câu lệnh>;
* Hoạt động :
- Bước 1: Kiểm tra điều kiện lặp:
+ Nếu điều kiện lặp sai thì thoát khỏi vòng lặp, chuyển sang lệnh tiếp theo.
+ Nếu điều kiện lặp đúng thì chuyển sang bước 2.
- Bước 2: Thực hiện khối các lệnh lặp.
- Bước 3: Quay lại bước 1.
Câu 4:
Program Tinh_tong;
Uses crt;
var i,n:integer;
s:longint;
Begin
clrscr;
Write('Nhap so n:'); Readln(n);
s:=0;
For i:=1 to n do s:=s+i;
Writeln('Tong cac so la:',S);
Readln
End.
Câu 11:
#include <bits/stdc++.h>
using namespace std;
long long n,i,x,ln;
int main()
{
cin>>n;
ln=LLONG_MIN;
for (i=1; i<=n; i++)
{
cin>>x;
ln=max(ln,x);
}
cout<<ln;
return 0;
}