Đăng ký thành viên ĐƠN GIẢN với FB, Gmail, HM để có cơ hội nhận quà từ diễn đàn.

[ Tin 8] Câu lệnh lặp !

Thảo luận trong 'Tin học cấp II' bắt đầu bởi thuyhung27, 15 Tháng một 2014.

Lượt xem: 426

  1. thuyhung27

    thuyhung27 Guest

    Cuộc thi "Khi tôi là Admin" | "Văn học trong tôi"

    Đặt chỗ bí kíp giúp bứt phá 9,10đ lớp 11 - Xem ngay!


    Đề bài:Sử dụng câu lệnh lặp em hãy tính tổng và tích các số tự nhiên lẻ liên tiếp từ 1 đến 101. thanks nhìu!!!
     
  2. hiepsh97

    hiepsh97 Guest

    PHP:
    program bt;
    var 
          
    SP, : word;
          
    byte;
    begin
       S
    :=0P:=1;
       for 
    i:=1 to 101 do
           if 
    i mod 2 =1 then 
                 begin
                      S
    :=S+i;
                      
    P:=P*i;
                 
    end;
       
    writeln('Tong = ',T,' Tich = ',P);
       
    readln;
    end.
     

CHIA SẺ TRANG NÀY