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.

5 tháng 12 2016

de 1:

huong dan

- Nhập hai cạnh vào hai biến a, b.

- Chu vi hình chữ nhật bằng 2*(a+b); Diện tích hình chữ nhật bằng a*b.

b. Mã chương trình:

Program Chu_nhat;

uses crt;

Var a, b, S, CV: real;

Begin

Write('Nhap chieu dai:'); readln(a);

Write('Nhap chieu rong:'); readln(b);

S := a*b;

CV := (a+b)*2;

Writeln('Dien tich hinh chu nhat la:',S);

Writeln('Chu vi hinh chu nhat la:',CV:10:2);

readln

end.

de 3,

 

program bt;
uses CRT;
var m,n:integer;
T:real;
BEGIN clrscr;
write('m,n ='); readln(m,n);
writeln('Tong la:',m+n);
writeln('Hieu la:',m-n);
writeln('Tich la:',m*n);
T:=m/n;
writeln('Thuong la:',T);
readln
END.

 

25 tháng 9

Hử

24 tháng 12 2018

câu lệnh clrscr dùng để xóa màn hình và chỉ sử dụng được khi đã khai báo thư viện crt.

CHÚC BẠN THI TỐT

1 tháng 1 2019

chúc bạn thi tốt đạt nhiều điểm cao nhé!!!!!!!!vui

Câu 1: Xác định bài toán là: A. Viết thuật toán của bài toán B. Tìm INPUT và OUTPUT C. Viết chương trình D. Tất cả đều sai Câu 2: Quá trình giải toán trên máy tính gồm các bước: A. Xác định bài toán B. Mô tả thuật toán và viết chương trình C. Xác định bài toán và viết chương trìn D. Câu a và b đúng. Câu 3: Các kiểu dữ liệu nào sau đây không...
Đọc tiếp

  • Câu 1:

    Xác định bài toán là:

    • A. Viết thuật toán của bài toán
    • B. Tìm INPUT và OUTPUT
    • C. Viết chương trình
    • D. Tất cả đều sai
  • Câu 2:

    Quá trình giải toán trên máy tính gồm các bước:

    • A. Xác định bài toán
    • B. Mô tả thuật toán và viết chương trình
    • C. Xác định bài toán và viết chương trìn
    • D. Câu a và b đúng.
  • Câu 3:

    Các kiểu dữ liệu nào sau đây không phải là kiểu dữ liệu trong ngôn ngữ lập trình Pascal:

    • A. Chuỗi
    • B. Kí tự
    • C. Số nguyên
    • D. Hằng
  • Câu 4:

    Câu lệnh sau cho kết quả là gì? Write(‘5’,+,’6’)

  • Câu 5:

    Câu lệnh Readln; mang ý nghĩa gì?

    • A. Nhập giá trị cho biến
    • B. Xuất giá trị của biến
    • C. Tạm dừng chương trình để xem kết quả
    • D. Câu lệnh thiếu.
  • Câu 6:

    Tổ hợp phím CTRL + F9 có chức năng gì?

    • A. Xem màn hình kết quả
    • B. Chạy chương trình
    • C. Thóat khỏi Pascal
    • D. Dịch chương trình.
  • Câu 7:

    Khai báo sau có ý nghĩa gì?

    Var a: integer; b: Char;

    • A. Biến a thuộc kiểu dữ liệu số thực và biến b thuộc kiểu dữ liệu kí tự
    • B. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu xâu
    • C. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu kí tự
    • D. Các câu trên đều sai.
  • Câu 8:

    Câu lệnh: a:=a+1; có ý nghĩa gì?

    • A. Gán giá trị biến a cho a rồi cộng thêm 1 đơn vị
    • B. Giá trị a cộng thêm 1 đơn vị rồi gán cho biến a
    • C. Câu a và b sai
    • D. Câu a và b đúng.
  • Câu 9:

    Sau khi thực hiện đọan lệnh: Begin c:=a; a:=b; b:=c; End; Kết quả là gì?

    • A. Hoán đổi giá trị của hai biến a, c
    • B. Hoán đổi giá trị của hai biến a, c
    • C. Hoán đổi giá trị của hai biến b, c
    • D. Hoán đổi giá trị của hai biến b, c
  • Câu 10:

    Biến là gì?

    • A. Là đại lượng có giá trị không thay đổi trong quá trình thực hiện chương trình
    • B. Là đại lượng có giá trị luôn thay đổi trong quá trình thực hiện chương trình
    • C. Là đại lượng dùng để tính tốn
    • D. Là đại lượng dùng để khai báo tên chương
  • Câu 11:

    Tìm một điểm sai trong đoạn khai báo sau:

    Const lythuongkiet :=2010;

    • A. Dư dấu bằng (=)
    • B. Dư dấu hai chấm (:)
    • C. Tên hằng không được quá 8 kí tự.
    • D. Từ khóa khai báo hằng sai.
  • Câu 12:

    Hãy chỉ ra tên chương trình đặt sai trong các tên dưới đây:

    • A. Program baitap1;
    • B. Program bai tap1;
    • C. Program 1_baitap1;
    • D. Câu b và c sai
  • Câu 13:

    Trong chương trình Turbo Pascal từ khoá dùng để khai báo tên chương trình là:

    • A. Uses
    • B. Begin
    • C. Program
    • D. End
  • Câu 14:

    Một thuật toán chỉ có thể giải được bao nhiêu bài toán:

    • A. 1
    • B. 2
    • C. 3
    • D. nhiều
  • Câu 15:

    Cách khai báo hằng đúng là:

    • A. Const pi:=3,14 real;
    • B. Const pi: 3,14;
    • C. Const pi=3,14;
    • D. Const pi=3,14 real;
  • Câu 16:

    Cấu trúc rẽ nhánh có mấy dạng? Hãy viết biểu thức và vẽ sơ đồ các dạng cấu trúc rẽ nhánh.

  • Câu 17:

    chương trình nhập vào 1 số nguyên từ bàn phím, cho biết số nhập vào là số chẵn hay số lẻ (Dùng If ... Then ... Els

2
14 tháng 12 2019

Câu 1: B

Câu 2: D

Câu 3: D

Câu 4: Thông báo lỗi

Câu 5: C

Câu 6: B

Câu 7: C

Câu 8: D

Câu 9: Hoán đổi giá trị hai biến a và b nhé bạn

Câu 10: B

Câu 11: B

Câu 12: D

Câu 13: C

Câu 14: A

Câu 15: C

Câu 16:

-Cấu trúc rẽ nhánh có 2 dạngCâu 17
uses crt;

var a:integer;

begin

clrscr;

write('a='); readln(a);

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

else writeln(a,' la so le');

readln;

end.

14 tháng 12 2019

C1: A

C2: D

C3: D

C4: báo lỗi

C5: C

C6: B

C7: C

C8: D

C9: Hoán đổi gt biến a và b

C10: B

C11: B

C12: D

C13: C

C14: A

C15: C

C16

- Cấu trúc rẽ nhánh có 2 loại

Hỏi đáp Tin học

C17

Hỏi đáp Tin học

28 tháng 9 2016

Những chỗ sai được in đậm em nhé

program Hà 0908

uses crt;

begin

clrscr;

writeln('(2+9)(9+2)/(10+1)= '; (2+9)(9+2)/(10+1)= :4:2');

readln;

end.

Sửa lại như sau:

program Ha_0908;

uses crt;

begin

clrscr;

writeln('(2+9)(9+2)/(10+1)= ', (2+9)(9+2)/(10+1):4:2);

readln;

end.

1 tháng 10 2016

sai nhu nay 

Hà 0908 ko ';'

writeln... =;4;2'); => ko co dau ' nay nha 

19 tháng 11 2017
Program hinhthang;
uses crt;
var a, b, c, d, P, S, h:real;
BEGIN
write ( 'nhap do dai day be a, day lon b, 2 canh ben c, d va chieu cao h: ');
readln(a, b, c, d, h);
P:=a+b+c+d;
S:=((a+b)*h)/2;
writeln ( ' chu vi = ',P:8:3, 'dien tich = ',S:8:3);
readln
END.

#include <bits/stdc++.h>

using namespace std;

long long s1,s2,s3,s4,i;

int main()

{

s1=0;

for (i=1; i<=100; i++) s1=s1+i*i;

s2=0;

for (i=1; i<=100; i++) if (i%2==1) s2+=i;

s3=0;

for (i=1; i<=100; i++) 

{

if (i%2==1) s3+=i*i;

else s3-=i*i;

}

s4=0;

for (i=1; i<=100; i++)

{

if (i%2==1) s4+=i;

else s4-=i;

}

cout<<s1<<" "<<s2<<" "<<s3<<" "<<s4;

return 0;

}

A. Lý Thuyết: Nêu ý nghĩa của các từ khóa,câu lệnh trong Pascal: program,begin,end,uses,var,const,clrscr,delay(x),write ( ),readln,readln (x) Trắc nghiệm: Câu 1: Các ngôn ngữ lập trình phân chia dữ liệu thành các kiểu dữ liệu khác nhau với mục đích gì ? Hãy chọn phương án sai: ​ a)Sử dụng bộ nhớ máy tính có hiệu quả b)Thực hiện các phép toán tương ứng với từng kiểu dữ liệu c)Tự động hóa...
Đọc tiếp

A. Lý Thuyết:

Nêu ý nghĩa của các từ khóa,câu lệnh trong Pascal: program,begin,end,uses,var,const,clrscr,delay(x),write ( ),readln,readln (x)

Trắc nghiệm:

Câu 1: Các ngôn ngữ lập trình phân chia dữ liệu thành các kiểu dữ liệu khác nhau với mục đích gì ? Hãy chọn phương án sai:

a)Sử dụng bộ nhớ máy tính có hiệu quả

b)Thực hiện các phép toán tương ứng với từng kiểu dữ liệu

c)Tự động hóa việc viết chương trình

Câu 2:Hãy chọn câu đúng:

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 = 2 ; 14 mod 5 = 2

d) 14/5=3; 14 div 5 = 2 ; 14 mod 5 = 4

Câu 3: Giá trị của biến a sau khi thực hiện chương trình: "a:=5 ; a:=a–4" là:

a) 1 b) 2 c) 3 d) 4

Câu 4: Số biến có thể khai báo tối đa trong một chương trình là bao nhiêu:

a)Chỉ một biến cho một kiểu dữ liệu

b)Chỉ hạn chế bởi dung lượng nhớ

c) 10 biến

d) Không giới hạn

Câu 5: Giả sử A được khai báo là biến với kiểu dữ liệu là số thực,phép gán nào đúng:

a)A:= ' 38.59 b) A:=35.59; c) A:=3559 d) cả b và c đều đúng

Câu 6:Trong Pascal,khai báo đúng là:

a) Var chieudai:real

b) Var 40HS: integer

c) Var R=50

d) Cả b và c đều đúng

B. Bài Tập:

1. Tìm ra chỗ sai ( gạch chân ) và giải thích tại sao sai :

a) var a,b:=integer

const c:=4 ;

begin :

a:= 10

b:=a/c;

write( ' gia tri cua b la ' b);

end.

b) var : a: real; b: integer;

const c:=4

begin

c:=4.1;

a:=10;

b:=a/c

write( ' gia tri cua b la ' b )

end

2. Viết thuật toán rồi viết chương trình bằng ngôn ngữ Pascal để giải bài toán:

a) Tính tổng của n số tự nhiên đầu tiên. Lậo bảng chạy tay với n=10, n=15

b) Hoán đổi giá trị của 2 biến x và y. Lập bảng chạy tay với x 🔙 10; y 🔙1

Mong các bạn giúp mình !

0