Viết ct nhập 2 số nguyên dương N và m -in ra màn hình các số chia hét cho m từ 1 đến N -Tính tổng căn bật hai các số đó

Viết ct nhập 2 số nguyên dương N và m
-in ra màn hình các số chia hét cho m từ 1 đến N
-Tính tổng căn bật hai các số đó

0 bình luận về “Viết ct nhập 2 số nguyên dương N và m -in ra màn hình các số chia hét cho m từ 1 đến N -Tính tổng căn bật hai các số đó”

  1. program baigiai;

    uses crt;

    var n,m,i:integer;

           s:real;

    begin

    clrscr;

    write(‘Nhap n: ‘);   readln(n);

    write(‘Nhap m: ‘);    readln(m);

    write(‘Cac so chia het cho ‘,m,’ tu 1 den ‘,n,’ la: ‘);

    s:=0;

    for i:=1 to n do

     begin

      if i mod m=0 then write(i,’ ‘);

      s:=s+sqrt(i);

     end;

    writeln;

    write(‘Tong can bac hai cua cac so do la: ‘,s:2:2);

    readln

    end.

    Bình luận

Viết một bình luận