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.

27 tháng 2 2019

bạn giải thích rõ hơn về sđt loại II đi+1 số VD về nó nữa

mik ra dc loại 1 là 400000

27 tháng 2 2019

cho mik thêm 1 vài vd về sđt loại II đi

14 tháng 11 2021

1:

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a*b;

return 0;

}

25 tháng 11 2023

#include <iostream>

#include <string>

#include <algorithm>

int main() {

     int n, k;

     std::cin >> n >> k;

     std::string number = std::to_string(n);

     int numDigits = number.length();

     if (k >= numDigits) {

          std::cout << "0" << std::endl;

     } else {

          std::sort(number.begin(), number.end(), std::greater<char>());

          number = number.substr(0, numDigits - k);

          std::cout << number << std::endl;

     }

     return 0;

}

30 tháng 7 2023

Tham khảo!

Ví dụ về sự vi phạm pháp luật, vi phạm đạo đức hoặc thiếu văn hóa thường gặp trong giao tiếp qua mạng: Các bạn thanh thiếu niên cãi nhau, nói những lời thiếu văn hoá, khích bác, xúc phạm tới danh dự cá nhân của người khác.

5 tháng 5 2021

Viết chương trình nhập vào số nguyên n và tính tổng các số lẻ (các số lẻ là số không chia hết cho 2) trong khoảng từ 1 đến n ( ví dụ nhập = 10, ta sẽ có tổng sau s=1+3+5+7+9=25)

uses crt;

var i,n,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

for i:=1 to n do 

 if i mod 2=1 then s:=s+i;

writeln(s);

readln;

end.

uses crt;

var n,kt,snt,b,m:longint;

{-----------------------------}

procedure nhap(var a:longint);

begin   

write('nhap n:'); readln(a);

end;

{-------------------------------------------}

function ktnt(var x:longint):integer;

var kt,i,kt1,j:integer;

begin   

kt:=0;   

for i:=2 to trunc(sqrt(x)) do     

if x mod i=0 then

begin                         

kt:=1;                         

break;                       

end;   

if kt=0 then ktnt:=1   

else ktnt:=0;

end;

{-----------------------------------------------------}

BEGIN   

clrscr;   

nhap(n);   

for m:=10 to n do   

{-----------------------------------------------}   

begin     

begin       

b:=m;     

repeat         

kt:=ktnt(b);         

if kt=0 then break         

else b:=b div 10;     

until b<10;     

if (ktnt(b)=1) and (b>1) then write(m,' ')     

end;   

end; 

{-------------------------------------------------}

readln;

END.

6 tháng 3 2021

ai làm giúp mình

 

18 tháng 11 2021

Tham khảo

 

Đầu tiên chúng ta cần khai báo biến n kiểu int, sau đó yêu cầu người dùng nhập giá trị cho n.

Tiếp đến là ta chia lấy dư n cho 10 để lấy hàng đơn vị. Để lấy được hàng chục ta chia lấy nguyên cho 10 rồi sau đó chia lấy dư cho 10 (b = (n / 10) % 10).

Hàng trăm sẽ bằng n chia lấy nguyên cho 100.

Sau khi đã có được hàng trăm, hàng chục và hàng đơn vị, ta sử dụng switch..case để đọc theo hàng trăm, hàng chục và hàng đơn vị.

18 tháng 11 2021

Tham khảo

Đầu tiên chúng ta cần khai báo biến n kiểu int, sau đó yêu cầu người dùng nhập giá trị cho n.

Tiếp đến là ta chia lấy dư n cho 10 để lấy hàng đơn vị. Để lấy được hàng chục ta chia lấy nguyên cho 10 rồi sau đó chia lấy dư cho 10 (b = (n / 10) % 10).

Hàng trăm sẽ bằng n chia lấy nguyên cho 100.

Sau khi đã có được hàng trăm, hàng chục và hàng đơn vị, ta sử dụng switch..case để đọc theo hàng trăm, hàng chục và hàng đơn vị nha

16 tháng 1 2022
Tính tổng N = 2+4+6+8+10 Mk nhầm
24 tháng 1 2022

Bạn kham khảo bài của mình nhé!

Program nhap_so_n;

Uses crt;

Var i,n,s:integer;

Begin clrscr;

Write('Nhap so n= ');Readln(n);

S:=0;

For i:=1 to n do

If i mod 2 = 0 do S:=S+i;

Writeln;

Write('tong cac so chan la ',S);

Readln;

End.

Mình chúc bạn học tốt!