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.

3 tháng 9 2019

Mô tả thuật toán pha trà mời khách

   + B1: Tráng ấm, chén bằng nước sôi

   + B2: Cho trà vào ấm

   + B3: Rót nước sôi vào ấm và đợi khoảng 3 đến 4 phút.

   + B4: Rót trà ra chén để mời khách.

   Đáp án: B

29 tháng 12 2016

T=40

i=20

30 tháng 4 2019

T <-- 20; i <-- 0;

i ĐK(i<20) Vòng lặp T
5 Đ 1 25
10 Đ 2 35
15 Đ 3 50
20 S Kết thúc

Vậy T = 50, i = 20

a: Thực hiện 5 vòng lặp

T=35

j=11

b: Câu lệnh chưa biết trước là while-do, và chương trình của bạn chỉ cần sửa lại chỗ j:=1 thành b:=1 mà thôi

4 tháng 12 2019

Uses crt;

Var a,b,S1,S2,S: real ;

Begin

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

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

S1:=2*a*b;

S2:= (3.14*b*sqr(a))/2;

S:= S1+S2;

If (a<>0) and (b<>0) then Write (S);

Readln ;

End.

uses crt;

var a,b,s1:integer;

s2,s:real;

begin

clrscr;

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

write('b='); readln(b);

s1:=2*a*b;

s2:=(sqr(a)*b*pi))/2;

s:=s1+s2;

writeln(s:4:2);

readln;

end.

uses crt;

var s,n:integer;

begin

clrscr;

s:=20;

n:=1;

while s>=5 do 

begin

n:=n+1;

s:=s-n;

end;

writeln(s);

readln;

end.

Thuật toán sẽ chạy 5 vòng lặp

Kết thúc thì S=0