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.

1 tháng 10 2017

Trả lời:

Khởi động Turbo Pascal bằng một trong hai cách:

Cách 1: Nháy đúp chuột vào biểu tượng Turbo Pascal trên màn hình.

Cách 2: Nháy đúp chuột vào tên tệp Turbo.exe trong thư mục chứa tệp này (thường là thu mục con TB/BIN).

Chúc bạn học tốt!

1 tháng 10 2017

hihicảm ơn bạn nhiều

uses crt;

var i,n,kt:integer;

begin

clrscr;

readln(n);

kt:=0;

for i=2 to trunc(sqrt(n)) do 

 if n mod i=0 then kt:=1;

if (kt=0) and (n>1) then write('phai')

else write('Khong phai');

readln;

end.

14 tháng 5 2022

Var i,n,souoc:integer;

Begin

While n <= 1 do

Begin

Write('Nhap n = ');readln(n);

End;

For i:=1 to n do

If n mod i = 0 then souoc:=souoc+1;

If souoc = 2 then write(n,' la so nguyen to')

Else write(n,' khong la so nguyen to');

Readln;

End.

23 tháng 3 2022

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

23 tháng 3 2022

sửa kiểu j vậy?

30 tháng 9 2016

Truc Thanh chương trình Turbo Pascal pn tải về máy tính của pn r thì không mở rộng đk đâu. 

1 tháng 10 2016

Để phóng to ( mở rộng ) chương trình Turbo Pascal ta nhấn tổ hợp phím Alt + Enter

16 tháng 3 2023

Program HOC24;

var S,n: integer;

begin

s:=1; n:=0;

while s<10 do

begin

n:=n+2;

s:=s+n;

end;

write('S= ' ,s);

readln

end.

Câu 1 : Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal.A. 8a                         A. tamgiac            C. program           D. bai tapCâu 2 : Để chạy chương trình trong Turbo Pascal ta dùng tổ hợp phím nào  ?A. Ctrl + F9               B. Alt + F9                     C. F9                    D. Ctrl + Shitf + F9Câu 3 :  Trong Pascal, khai báo nào sau đây là đúng cho khai báo biến ?A. Var  tb: real;                   B. Type  4hs: integer;     C. Const ...
Đọc tiếp

Câu 1 : Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal.

A. 8a                         A. tamgiac            C. program           D. bai tap

Câu 2 : Để chạy chương trình trong Turbo Pascal ta dùng tổ hợp phím nào  ?

A. Ctrl + F9               B. Alt + F9                     C. F9                    D. Ctrl + Shitf + F9

Câu 3 :  Trong Pascal, khai báo nào sau đây là đúng cho khai báo biến ?

A. Var  tb: real;                   B. Type  4hs: integer;     C. Const  x: real;            D. Var  R = 30;

Câu 4 : Biểu thức toán học  (a2 + b)(1 + c)3 được biểu diễn trong Pascal như thế nào ?

A. (a*a + b)(1+c)(1 + c)(1 + c)                                   B. (a.a  + b)(1 +  c)(1 + c)(1 + c)

C. (a*a + b)*(1 + c)*(1 + c)*(1 + c)                           D. (a2 + b)(1 + c3

Câu 5: Để nhập dữ liệu ta dùng lệnh:

          A.Clrscr;       B.Readln(x);                 C. X:= ‘dulieu’;         d.Write(‘Nhap du lieu’);                               

Câu 6 : Bốn bạn A, B, C, D  đưa ra kết quả của phép chia, phép chia lấy phần nguyên và lấy phần dư của hai số nguyên 14 và 5 như sau :

A. 14/5 =2;   14 div 5 = 2;   14 mod 5 = 4       B. 14/5 =2.8;  14 div 5 = 2;    14 mod 5 = 4

C. 14/5 =2.8;  14 div 5 = 4;  14 mod 5 = 2      D. 14/5 =3;          14 div 5 = 2          ;   14 mod 5 = 4

Hãy chọn bạn làm đúng

Câu 7. Những từ nào sau đây là từ khoá?

A. Begin, Uses, End, Thong bao                                 B. Program, Begin, char, Uses,

C. Var, Const, Write                                          D. Program, Begin, Uses, end

Câu 8. Trong cấu trúc chương trình Pascal, phần nào là phần bắt buộc phải có?

A. Phần tiêu đề chương trình                                     B. Phần thân chương trình

C. Phần khai báo thư viện                                D. Phần khai báo biến.

Phần 2 : Tự luận

Câu 9 : Viết các biểu thức toán sau đây dưới dạng biểu thức Pascal : (3 điểm)

a. 15x2 + 30 (x+2)               b.                    c.

Câu 10 : (3 điểm)

Viết chương trình nhập vào 2 số nguyên  a, b từ bàn phím, tính trung bình cộng (TB) của hai số a, b và in kết quả ra màn hình.

1

Câu 1: B

Câu 2: A

Câu 3: A

Câu 4: C

Câu 5: B

15 tháng 10 2016

writeln / write = ra

read =vao

15 tháng 10 2016

 cảm ơn 

1 tháng 3 2023

tong=15

các bước làm:

lần lặp thứ 1: tong = 0 + 1 = 1

lần lặp thứ 2 : tong = 1 + 2 = 3

lần lặp thứ 3 : tong = 3 + 3 = 6

lần lặp thứ 4 : tong = 6 + 4 = 10

lần lặp thứ 5 : tong = 10 + 5 = 15

14 tháng 4 2017

program vietchuongtrinh;

uses crt;

begin

clrscr;

writeln('Hello');

writeln('"Toi la Turbo Pascal"');

readln;

end.

14 tháng 4 2017

phải khai báo kiểu dữ liệu nữa kêr ._.