HOCMAI Forum đã quay trở lại, MỚI MẺ - TRẺ TRUNG - NĂNG ĐỘNG
Hãy GIA NHẬP ngay

pascal | cấu trúc if-then

Thảo luận trong 'Tin học - Máy tính' bắt đầu bởi donghomauvang, 13 Tháng mười hai 2009.

Lượt xem: 2,670

  1. Hướng dẫn Cách gõ công thức Toán học, Vật lý, Hóa học forum mới


    chỉ cần viết cấu trúc if-then mà thôi.
    1. gpt: ax+b=0 [a,b nhập từ bàn phím].
    2. tìm GTLN của 3 số a,b,c.
    3. nhập số n. In tổng các chữ số của n nếu n là số có 3 chữ số, ngược lại thì in căn bậc hai của n.
    ;);)
     
  2. nani_tam999

    nani_tam999 Guest


    ==>>Câu lệnh if-then chứ ko phải cấu trúc nhé :)
    a)
    Mã:
    if a=0 then
       if b=0 then write('pt co vo so nghiem ')
       else write('Pt vo nghiem')
    else 
       begin
              x:=-b/a;
              write('pt co 1 nghiem duy nhat la ',x);
        end;
    readln;
    b)
    Mã:
    max:=0;
    if a>max then max:=a;
    if b>max then max:=b;
    if c>max then max:=c;
    write(max) ; readln;
    c)
    Mã:
    s:=0;
    if (n>=100) and (N<1000) then
      begin
             while n>=1 then
                begin
                       x:=n mod 10;
                       n:=n div 10;
                       s:=s+x;
                end;
             write(s);   
       end
    else write(sqrt(n));
    readln;
     
    Last edited by a moderator: 13 Tháng mười hai 2009

  3. ở câu b, hình như là nhập 3 số a,b,c rồi so sánh xem số nào lớn hơn thì phải?
     

  4. câu 3 thì làm theo bạn này nani_tam999 lak ngắn nhất mak hay nhất.
    làm theo bạn donghomauvang cũng đúng nhưng mak có lẽ sẻ dài hơn
     

  5. c)
    Mã:
    s:=0;
    if (n>=100) and (N<1000) then
      begin
             while n>=1 then
                begin
                       x:=n mod 10;
                       n:=n div 10;
                       s:=s+x;
                end;
             write(s);   
       end
    else write(sqrt(n));
    readln;
    mà vì sao phải gán s:=0 nhỉ
     
  6. nani_tam999

    nani_tam999 Guest


    Ban đầu phải gán tổng = 0, sau đó mới tính như đằng sau. Ko gán thì có thể máy tính sẽ gán mấy cái giá trị rác vào S => tính bị sai. Nói dễ hiểu hơn là nếu ko gán thì ko thể biét lúc đầu S = bao nhiêu mà cộng cả :)
    Tức là tìm max đấy. Bạn còn thắc mắc gì nữa ko ?
     

CHIA SẺ TRANG NÀY