Câu 2. Hãy cho biết kết quả sau khi thực hiện chương trình sau:
|
PROGRAM Inso; USES crt; VAR M, N, i : integer; BEGIN clrscr; M := 0 ; N := 0 ; For i := 1 TO 20 do |
Begin if ( (I mod 3) = 0 ) then M := M + i ; if ( (I mod 3) = 0 ) and ( (I mod 5) = 0 ) then N := N+i ; End; writeln( ‘M=’, M, ‘N=’, N); readln END.
|
giusp mình với :(((
Hãy cho biết giá trị của a và b là bao nhiêu khi kết thúc chương trình sau:
Var a, b: integer;
Begin
a:=10 ; b:=6;
If a<b then begin a :=a+b; a := a- b end;
Writeln('a = ', a, ' b = ',b);
End.
Cho một đoạn chương trình. Tính kết quả S = ?
S:=0;
For i := 1 to 11 do S := S+1;
1. Cho mảng B một chiều gồm M phần tử. Viết chương trinh nhập giá trị vào cho mảng, sau đó in ra màn hình các phần tử các phần tử có giá trị là chẵn và là bội của 4 có trong mảng.
2. Viết chương trình nhập vào xâu S bất kỳ từ bàn phím. In ra màn hình các chữ cái có trong xâu, nếu không có thì in ra màn hình dòng thông báo ‘khong co ky tu nao la chu cai co trong xau’.
giúp em với ạ!!!!! em đang cần gấppp
Bài kt 1 tiết ai biết câu nào không bày em vs ạ. Em xin cả mơn trước ạ
1. Viết chương trình đếm số dòng tệp tin văn bản có tên là VANBAN.txt
2. Viết chương trình đọc và in ra màn hình nội dung tệp văn bản với tên VANBAN.txt (nội dung văn bản đã đc tạo ra từ trước nội dung gồm nhiều dòng)
3. Viết công thức từ trang 1 xâu nhập vào từ bàn phím
Viết chương trình lập 2 số nguyên dương m, n từ bàn phím (m<n) đếm và đưa ra màn hình số lượng các số lẻ không chia hết cho 3 hoặc 5 trong phạm vi từ m đến n
Bài 1 viết chư ơng trình pascal nhập vào 2 số nguyên m và n đưa ra màn hình tổng số chia hết cho 3 và 5 từ m đến N
*giải gúp mình vs:
bt: Mảng A gồm N phần tử thuộc kiểu nguyên (N<=50)? Viết chương trình có sử dụng CTC thực hiện các yêu cầu sau:
a>
- Viết thủ tụp nhập giá trị cho mảng A từ bàn phím.
-Viết hàm tìm giá trị nhỏ nhất trong mảng A.
b>
- Viết thủ tục nhập giá trị cho mảng A từ bàn Phím
- Viết hàm tính tổng các phần tử là số chẳn trong mảng A.
Vd3: Viết chương trình in ra màn hình danh sách họ và tên các bạn trong tổ của mình
viết chương trình tính U=√2gh với g=9,8. với h nhập từ bàn phím. khai báo hằng