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ố đó 24/07/2021 Bởi Melody 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ố đó
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
Chúc bạn học tốt ạ!
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.