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.

2 tháng 11 2021

Program bai tap 1; -> Program Bai_tap_1;

Uses CRT -> Uses CRT;

Var a;=integen; -> Var a: integer;

b;=real; -> b: real;

Constc;=3; -> Const c=3;

Begin

a:=200;

b:=a/c;

Readln;

End -> End.

2 tháng 11 2021

Program bai tap 1; -> Program Bai_tap_1; Uses CRT -> Uses CRT; Var a;=integen; -> Var a: integer; b;=real; -> b: real; Constc;=3; -> Const c=3; Begin a:=200; b:=a/c;

18 tháng 2 2022

Tham khảo: 

program ct;

uses crt;

var a,b,h,S:integer;

begin clrscr;

   writeln('Nhap do dai hai day: '); readln(a,b);

   writel('Nhap chieu cao: '); readln(h);

     S:=h*((a+b)/2);

   writeln('Dien tich hinh thang do la: ',S);

readln;

end.

uses crt;

var s,a,b,h:real;

begin

clrscr;

readln(a,b,h);

s:=(a+b)/2*h;

writeln(s:4:2);

readln;

end.

29 tháng 11 2017

 

  Câu Đ-S Từ sai Từ đúng
1 Để đo điện trở phải dùng oát kế. S Oát kế Đồng hồ vạn năng
2 Ampe kế được mắc song song với mạch điện cần đo S Song song Nối tiếp
3 Đồng hồ vạn năng có thể đo được cả điện áp và điện trở của mạch điện Đ    
4 Vôn kế được mắc nối tiếp với mạch điện cần đo S Nối tiếp Song song
10 tháng 12 2021

sai

if x>5 then a:=b

else m:=n;

Câu 1:

-Đánh răng rửa mặt mỗi ngày

-Đi học

-Đi ngủ

Câu 2: 

a) Sai

Sửa lại: for i:=10 downto 1 do write('a');

b) Đúng

c) Đúng

Câu 3: 

Lặp n-1+1=n(lần)

Câu 4: 

S=15

Câu 5: 

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do

  s:=s+i;

writeln('Tong cua 10 so tu nhien dau tien la: ',s);

readln;

end.

 

22 tháng 2 2021

mấy câu kia bạn làm được ko giúp giúp mình luôn ik

a.for i:=1 to 10;do x:=x+1;

-> lệnh sai vì sau "to 10" không có dấu ';' 

For<biến đếm > := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

Sửa lại:for i:=1 to 10 do x:=x+1;

b.for i:=10 to 1 do x:=x+1;

-> lệnh sai vì for i:=10 to 1 giá trị đầu phải nhỏ hơn giá trị cuối(10>1) nên  không lặp được.

Sửa for i:=1 to 10 do x:=x+1;

c.while i:=1 do t=10;

-> lệnh sai phép gán giá trị cho biến VD: x:=1

t=10(sai) thiếu dấu ':'  

Sửa lại:

while i:=1 do t:=10;

d.while a<=b;do write('b lon hon a');

-> lệnh sai vì Sau While a<=b không có ';'(While <điều kiện> do <câu lệnh>) 

Sửa lại:

while a<=b do write('b lon hon a');

 

3 tháng 12 2021

1. fascinated => fascinating

2. I was embarrassed .....

3. bored => boring

4. welcoming => welcomed

5. bored => boring

6. was => bỏ

7. confusing => confused

8. Đ