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.

9 tháng 5 2023

L=int(input('L='))

R=int(input('R='))

a=int(input('a='))

b=int(input('b='))

if a > 0 and b > 0 and R > 0 and L > 0:

       d=0

       for i in range (L,R+1):

              if i%a==0 or i%b==0:

                     d+=1

       print('Số lượng các bội số của ',a,' hoặc ',b,' là: ',d)

9 tháng 5 2023

n=int(input('n='))

S=0

for i in range (1,n+1):

       S+=i*(i+1)

print('Tổng S là:',S)

uses crt;

var a,b,l,r,i,dem:integer;

begin

clrscr;

readln(a,b,l,r);

dem:=0;

for i:=l to r do

if (i mod a=0) and (i mod b=0) then inc(dem);

write(dem);

readln;

end.

30 tháng 8 2023

var a,b,dem,L,i,R:longint;

begin

readln(a,b,L,R);

dem:=0;

for i:=L to R do

if (i mod a=0) and (i mod b=0) then inc(dem);

write(dem);

readln;

end.

3 tháng 10 2021

Giúp mình ạ

#include <bits/stdc++.h>

using namespace std;

int main()

{

long a,b,x,dem,i;

cout<<"a="; cin>>a;

cout<<"b="; cin>>b;

cout<<"x="; cin>>x;

dem=0;

for (i=a; i<=b; i++)

if (i%x==0) dem++;

cout<<dem;

return 0;

}

28 tháng 12 2020

b) 

uses crt;

var i,y:integer;

begin

clrscr;

y:=0;

for i:=1 to 100 do 

  y:=y+i;

writeln('y=',y);

readln;

end.

c) 

uses crt;

var y,i:integer;

begin

clrscr;

y:=0;

i:=1;

while y<=3200 do 

  begin

y:=y+i;

inc(i);

end;

writeln('y=',y);

readln;

end.

11 tháng 12 2021

giúp Mình vs.

Mình cần gấp lắm

 

11 tháng 12 2021

Chỉ cần hai biến a,b kiểu nguyên là đủ rồi