OLM cung cấp gói bải giảng điện tử PPT cho giáo viên đầu năm học

Thi thử và xem hướng dẫn giải chi tiết đề tham khảo 12 môn thi Tốt nghiệp THPT 2025

Tập huấn miễn phí ra đề kiểm tra và chấm phiếu trắc nghiệm dành cho giáo viên khối THCS

K
Khách

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.

Tất cả Toán Vật lý Hóa học Sinh học Ngữ văn Tiếng anh Lịch sử Địa lý Tin học Công nghệ Giáo dục công dân Âm nhạc Mỹ thuật Tiếng anh thí điểm Lịch sử và Địa lý Thể dục Khoa học Tự nhiên và xã hội Đạo đức Thủ công Quốc phòng an ninh Tiếng việt Khoa học tự nhiên
Mua vip
HT
Hoang tu anh phuong
29 tháng 3 2020

Các câu lệnh điều kiện sau có viết đúng ko?chỉ ra lỗi sai nếu có:

A.If a mod 2=0;then write('a la so chan');

B.If a mod 2<>0then 'a la so le');

C.If i/2 then i:i+1;

D.If i mod 2=0 then i=i+1;
#Tin học lớp 8
2
PT
Phan Tiến Đạt
30 tháng 3 2020

A) Sai vì dư dấu " ; " trước chữ " then "

B) Sai vì thiếu chữ " write( " sau chữ " then "

C) Sai vì thiếu dấu " = " ở lệnh gán giá trị

D) Sai vì thiếu dấu " : " trước dấu " = " ở lệnh gán giá trị

Đúng(0)
NL
Nguyễn Lê Phước Thịnh
29 tháng 3 2020

A: Sai vì dư dấu ;

B: Sai vì thiếu dấu (

C: Sai vì thiếu điều kiện và thiếu dấu = ở phép gán

D: Đúng

Đúng(0)
CM
Cao Minh Thảo
9 tháng 12 2021

Câu lệnh sau có bao nhiêu lỗi sai? Hãy chỉ ra các lỗi sai đó:

if a mod 2 :=0 then writeln(a,' la so chan);

else writln(a, ' la so le')
#Tin học lớp 8
1
NL
Nguyễn Lê Phước Thịnh
9 tháng 12 2021

co 4 loi sai

if a mod 2:=0 là sai ở chỗ :

writeln(a,'la so chan); là sai ở chỗ sau chữ n thiếu dấu '

writln sai ở chỗ thiếu chữ e

(a,'la so le') sai ở chỗ thiếu chấm phẩy sau cùng

Đúng(1)
HT
Hoàn Trần
5 tháng 1 2022

“Nếu b chia 2 dư 1 thì in ra màn hình b la so le” được thể hiện câu lệnh trong Pascal như thế nào?

A. If b/2=1 then Write(‘b la so le’);

B. If b mod 2=1 then Writeln(b la so le);

C. If b mod 2=1 then Write(‘b la so le’);

D. If b div 2=1 then Write(‘b la so le’);
#Tin học lớp 8
1
VH
Vương Hương Giang
5 tháng 1 2022

C

Đúng(1)
HT
Hoàn Trần
5 tháng 1 2022

cảm ơn mn nhiều

Đúng(0)
LH
lê hà linh
15 tháng 4 2020
n:=10; s:=0; for i:=1 to n do if n mod i=0 then s:=s+i; Write(s); Hỏi s=? * a:=123; b:=456; IF a>b THEN a:=a-b ELSE b:=b+a; Write('a=',a,'b=',b); Hỏi a=? b=? n:=12345; if n mod 2 = 0 then write(' Y') else write('N'); hỏi kết quả trên màn hình là gì?
#Tin học lớp 8
0
BJ
Bùi Jessica
5 tháng 5 2020
Em hãy sắp xếp các câu lệnh sau và viết lại thành 1 chương trình hoàn chỉnh . Sau đó cho biết chương trình đó thực hiện công việc gì ? Writeln ( ' Tong cac phan tu le trong mang la : ' , tle ) ; End. Program Bai _ tap _ day _ so ; If a [ i ] mod 2 = 0 then chan : = tchan + a [ i ] Readln ; a:array [ 1 . . 100 ] of Integer ; Begin Clrscr ; write ( ' Nhap so phan tu cua mang : ' ) ; Readln ( n ) ; For i : = 1 to n do readln ( a [ i ] ) ; For i : = 1 to n do...
Đọc tiếp

Em hãy sắp xếp các câu lệnh sau và viết lại thành 1 chương trình hoàn chỉnh . Sau đó cho biết chương trình đó thực hiện công việc gì ? Writeln ( ' Tong cac phan tu le trong mang la : ' , tle ) ;
End.
Program Bai _ tap _ day _ so ;
If a [ i ] mod 2 = 0 then chan : = tchan + a [ i ] Readln ;
a:array [ 1 . . 100 ] of Integer ;
Begin
Clrscr ;
write ( ' Nhap so phan tu cua mang : ' ) ; Readln ( n ) ;
For i : = 1 to n do readln ( a [ i ] ) ;
For i : = 1 to n do
Write ( ' Nhap phan thu thu ' i ) ;
Writeln ( ' Tong cac phan tu chan trong mang la : ' , tchan ) ;
Begin
End ;
tchan : = 0 ; tle : = 0 ;
Else tle : = tle + a [ i ] ;
Uses crt ;
Var i , n , tchan , tle : Integer ;
#Tin học lớp 8
0
BP
Bình Phan
5 tháng 5 2021

Uses crt; Var i,t: integer; Begin Clrscr; t:=0; i:=0; t:=t+i; i:=i+1; Begin Readln; Write('tong các so chan nho hon 50 la',t); End; End. A)if mod 2=0 then B)while i

#Tin học lớp 8
0
DB
Đinh Bảo Nguyên
14 tháng 12 2021

 

Câu 20: Điền một trong các điều kiện : (a mod b=0) (adivb = 0) , (a div b =0), (a > b) (a^ < b),(a=b) vào câu lệnh sau cho đúng?

A. If......... then write( 'a chia het cho b^ prime ) else write(^ / không chia hết cho b);

B. If......... then write( a lon hon b');
#Tin học lớp 8
1
NL
Nguyễn Lê Phước Thịnh
19 tháng 12 2021

a: a mod b=0

Đúng(0)
TH
Thiên Hoàng Ân
5 tháng 4 2020
1. For I = 2 to 12 Do write ('O'), câu lệnh in ra bao nhiêu chữ O? 2. For I = 1 to 20 Do If (...) Then write (I,''); chỗ trống cần điền để liệt kê ra các SỐ LẺ từ 1 đến 20 là? 3. để tính tổng 1 + 2 + ... + 100 ta thực hiện For I = 1 to 100 Do S:=...... ... cần điền? 4. S;=0; For I:=4 to 12 Do If (I mod 12=1) Then S:=S +I; giá trị của S? 5. S;=0; For I:=1 to 5 Do S:=S +I; giá trị của S? 6. For I = 1 to 10 Do If (I mod 3 = 0) Then...
Đọc tiếp

1.

For I = 2 to 12 Do write ('O'), câu lệnh in ra bao nhiêu chữ O?

2.

For I = 1 to 20 Do If (...) Then write (I,'');

chỗ trống cần điền để liệt kê ra các SỐ LẺ từ 1 đến 20 là?

3.

để tính tổng 1 + 2 + ... + 100 ta thực hiện For I = 1 to 100 Do S:=......

... cần điền?

4.

S;=0; For I:=4 to 12 Do If (I mod 12=1) Then S:=S +I;

giá trị của S?

5.

S;=0; For I:=1 to 5 Do S:=S +I;

giá trị của S?

6.

For I = 1 to 10 Do If (I mod 3 = 0) Then write (I,'');

kết quả?

7.

a:= 354 If (a mod 3 = 0) them write (a mod 3) Else Write (a Div 3);

kết quả?

8.

để in ra màn hình 20 chữ C cần thực hiện?
#Tin học lớp 8
1
ML
Minh Lệ
5 tháng 4 2020

1) 11

2) I mod 2=1

3) S+i;

4) 0

5) 15

6) 3 6 9

7) 0

8) for i:=1 to 20 do write('C');

Đúng(0)
NH
Nguyễn Hoàng Giang
25 tháng 4 2021

program bai_giai;
uses crt;
var A:array[1..10] of integer;
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do;
begin
write('nhap so thu ',i,':');
readln(A [i]);
if a[i]mod 3=0 then;
begin
s:=s+A[i];
end.

cho em hỏi chương trình trên đúng ko ạ?
#Tin học lớp 8
1
NL
Nguyễn Lê Phước Thịnh
26 tháng 4 2021

Không đúng nha bạn

Đúng(0)
BC
Ba chú heo con
20 tháng 5 2020

Program tong_so_le;

Uses crt;

Var S,N,I:Integer;

Xữa chương trình sau( nếu sai)

Begin

Clrscr;

Write('Nhap N ');Readln(N);

S:=0;

For I:=1 to N do If (I mod 2<>0) then

S:=S+I;

Writeln('Tong cac so le la ',S); Readln;

End.

Giup mik nha các bn

Thanks
#Tin học lớp 8
0
Bảng xếp hạng
Tất cả Toán Vật lý Hóa học Sinh học Ngữ văn Tiếng anh Lịch sử Địa lý Tin học Công nghệ Giáo dục công dân Âm nhạc Mỹ thuật Tiếng anh thí điểm Lịch sử và Địa lý Thể dục Khoa học Tự nhiên và xã hội Đạo đức Thủ công Quốc phòng an ninh Tiếng việt Khoa học tự nhiên
  • Tuần
  • Tháng
  • Năm
Các khóa học có thể bạn quan tâm
Tổng thanh toán: 0đ (Tiết kiệm: 0đ)
Tới giỏ hàng
Yêu cầu VIP