Giúp với Program ktchanle Uses ctr; Var...; Begin .... Nhập số a.... Nếu chia hết 2 thì Write ( a là số chẵn) Nếu không chia hết thì Write ( a là số lẻ )
Những câu hỏi liên quan
Từ nào là các từ khóa trong chương trình:
A. Begin, Program, Write, Uses, Read
B. Program, Var, Begin, Uses, Const, End
C. End, Read, Var, Const, program
D. Program, Begin, End, Uses, integer
Từ nào là các từ khóa trong chương trình:
A. Begin, Program, Write, Uses, Read
B. Program, Var, Begin, Uses, Const, End
C. End, Read, Var, Const, program
D. Program, Begin, End, Uses, integer
Xem thêm câu trả lời
Tìm giúp lỗi sai rồi sữa lại nha
Program Chào ;
Begin
Uses crt ;
Writeln('Chào các bạn')
Reason;
End.
Xem chi tiết
Sai ở chỗ vị trí đặt của Uses crt; Thiếu chấm phẩy sau lệnh Writeln và sai chính tả chữ Reason
Sửa lại:
program chao;
uses crt;
begin
writeln('Chao cac ban');
readln;
end.
Đúng 0
Bình luận (0)
Đâu là các từ khoá:
a/ Program, end, begin.
b/ Program, end, begin, Readln, lop82
c/ Program, then, mot, hai,ba
d/ Lop82, uses, begin, end
program vidu123; uses crt; var:=x,y:=word; z:integer; begin x:=1.5; y:=3; z:=x/y; end. Mik ghi dầy ko bt đúg ko mog mn giúp mik sửa giùm cho mikvs ạ chìu mai mik đi thi òi
Dưới đây là một chương trình viết trong Pascal: program CT_dau_tien; uses crt; begin writeln(‘ Chao cac ban’); readln; end. *
Program là từ khóa;
Program là tên;
CT_dau_tien là từ khóa;
CT_dau_tien là tên;
begin là từ khóa;
begin là tên;
writeln là từ khóa;
writeln là tên;
Program là từ khóa;
CT_dau_tien là tên;
begin là từ khóa;
writeln là từ khóa;
Đúng 0
Bình luận (0)
Đọc tệp sẵn là Data(I).txt bên trong có 24 chữ số có cả âm và dương. Tính tổng 24 chữ số rồi in ra Data(O).txt . Các bác giúp em với program day_so; uses crt; Const fi(An(I).txt); fo(An(O).txt); var i,t,s,n: integer; f1,f2:text; a: array[1..24] of integer; begin clrscr; assign(f1,fi);reset(f1); assign(f2,fo);rewrite(f2); s:0; for i:1 to 24 do begin read(f1,a[i]); s:s+a[i]; end; write(f2,s); close(f1); close(f2); readln end. Em không biết sai ở đâu ☹️
Đọc tiếp
Đọc tệp sẵn là Data(I).txt bên trong có 24 chữ số có cả âm và dương. Tính tổng 24 chữ số rồi in ra Data(O).txt . Các bác giúp em với program day_so; uses crt; Const fi=('An(I).txt'); fo=('An(O).txt'); var i,t,s,n: integer; f1,f2:text; a: array[1..24] of integer; begin clrscr; assign(f1,fi);reset(f1); assign(f2,fo);rewrite(f2); s:=0; for i:=1 to 24 do begin read(f1,a[i]); s:=s+a[i]; end; write(f2,s); close(f1); close(f2); readln end. Em không biết sai ở đâu ☹️
Tại vì cái này là xuất ra file nên bạn hãy bỏ cái uses crt; clrscr; readln là sẽ chạy rất tốt
Đúng 0
Bình luận (1)
Dưới đây là một chương trình viết trong Pascal: program CT_Dau_tien ; Uses crt ; begin writeln ( ‘Toi la Turbo Pascal’ ) end.Tên chương trình là: A begin. B. end C. writeln D. crt
Đọc tiếp
Dưới đây là một chương trình viết trong Pascal:
program CT_Dau_tien ;
Uses crt ;
begin
writeln ( ‘Toi la Turbo Pascal’ )
end.
Tên chương trình là:
A begin. B. end C. writeln D. crt
1 là bn sửa hình nền
2 là mk gọi admin hoặc giáo viên khác khoá nick bn
Đúng 0
Bình luận (1)
Từ nào sau đây khong phải là từ khóa của chương trình: A. Uses B. Program C. Begin D. Computer
Trong Pascal, khai báo nào sau đây là sai:
A. program BaiTap 3;
B. uses crt;
C. var x1: byte;
D. const pi=3.14;
A sai bởi vì có kí tự trống giữa "Baitap" và "3"
Đúng 2
Bình luận (0)