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.

19 tháng 6 2023

#include<iostream>

using namespace std;

int main()    {

          int n, tram, chuc, donvi;

          cout<<"Nhap vao mot so co 3 chu so: ";

          cin>>n;

          tram = n / 100;

          chuc = (n%100) / 10;

          donvi = (n%100) % 10;

          cout<<"Chu so hang tram cua so "<<n<<" la: "<<tram<<endl;

          cout<<"Chu so hang chuc cua so "<<n<<" la: "<<chuc<<endl;

          cout<<"Chu so hang don vi cua so "<<n<<" la: "<<donvi<<endl;

          return 0;

}

13 tháng 1 2024

#include <bits/stdc++.h>
using namespace std;
#define ll long long
ll a;
int main()
{
    ios_base::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    cin>>a;
    cout<<a/100<<"\n"<<(a/10)%10<<"\n"<<a%10;
}

out tu đúng

17 tháng 6 2023

#include <iostream>

using namespace std;

int main()   {

      int num;

      cout << "Nhap vao mot so nguyen co 2 chu so: ";

      cin >> num;

      int hang_chuc = num / 10;

      int hang_don_vi = num % 10;

      cout << "Chu so hang chuc: " << hang_chuc << endl;

      cout << "Chu so hang don vi: " << hang_don_vi << endl;

      return 0;

}

#include <bits/stdc++.h>

using namespace std;

int a;

int main()

{

cin>>a;

cout<<a%10<<" "<<a/10;

}

7 tháng 12 2016

VD: 2,4,6

- số hàng trăm là 2

- số hàng chục là 4

-số hàng đơn vị là 6

- Tổng các chữ số:2+4+6=12

GIÚP MK VS MK ĐANG CẦN GẤP!!! vuivuivui

22 tháng 10 2017

program hoan_doi;

var x,y,z : integer;

begin

read(x,y);

writeln(x,'',y) ;

z := x;

x:=y ;

y:= z ;

writeln (x,'',y) ;

readln

end.

Mình ko chắc

6 tháng 5 2018

Mình nghĩ câu này đã có trong sách rồi.

18 tháng 3 2023

Uses crt;

var n,i,x,u: integer;

begin clrscr;

readln(n);

for i:=1 to n do begin

readln(x);

u:=u+x;

end;

writeln(u);

readln;

end.

25 tháng 12 2023

program TongCacSoNguyen;

var
  N, i, soNguyen, tong: integer;

begin
  // Nhập số lượng N
  write('Nhap so luong N: ');
  readln(N);

  // Khởi tạo tổng
  tong := 0;

  // Nhập và tính tổng các số nguyên
  for i := 1 to N do
  begin
    write('Nhap so nguyen thu ', i, ': ');
    readln(soNguyen);
    tong := tong + soNguyen;
  end;

  // In ra màn hình tổng
  writeln('Tong cua cac so nguyen la: ', tong);

  readln;
end.

uses crt;

var a:array[1..100]of integer;

i:integer;

begin

clrscr;

for i:=1 to 100 do 

 begin

write('A[',i,']='); readln(a[i]);

end;

for i:=1 to 100 do 

  write(a[i]:2);

readln;

end.

19 tháng 4 2023

program TinhTongSo;
uses crt;
var
  a: array [1..10] of integer;
  i, tong, dem: integer;
begin
  clrscr;
  writeln('Nhap day 10 so nguyen: ');
  for i := 1 to 10 do
  begin
    write('Nhap so thu ', i, ': ');
    readln(a[i]);
  end;
  writeln('Day so da nhap tren mot hang: ');
  for i := 1 to 10 do
    write(a[i], ' ');
  tong := 0;
  for i := 1 to 10 do
    if a[i] < 0 then
      tong := tong + a[i];
  writeln('Tong cac so nguyen am: ', tong);
  dem := 0;
  for i := 1 to 10 do
    if (a[i] > 6) and (a[i] < 9) then
      dem := dem + 1;
  writeln('So luong cac so thoa dieu kien "lon hon 6 va nho hon 9": ', dem);
  readln;
end.

Câu 1:

uses crt;
var a,b,c,d,min:longint;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
write('d='); readln(d);
min:=a;
if min>b then min:=b;
if min>c then min:=c;
if min>d then min:=d;
writeln('so nho nhat la: ',min);
readln;
end.

Câu 2:

uses crt;
var a,b,c:real;
begin
clrscr;
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
if (a>0) and (b>0) and (c>0) then
begin
if (a+b>c) and (a+c>b) and (b+c>a) then
begin
if (a=b) and (b=c) then writeln('day la 3 canh trong mot tam giac deu')
else writeln('day khong la 3 canh trong mot tam giac deu');
end
else writeln('day khong la 3 canh trong mot tam giac');
end
else writeln('vui long nhap 3 so duong');
readln;
end.

Câu 3:

uses crt;
var a,dv,ch,tr:longint;
begin
clrscr;
write('a='); readln(a);
if (a>=100) and (a<=999) then
begin
dv:=a mod 10;
ch:=a div 10; ch:=ch mod 10;
tr:=a div 100; tr:=tr mod 10;
writeln('chu so hang tram: ',tr);
writeln('chu so hang chuc: ',ch);
writeln('chu so hang don vi: ',dv);
end
else writeln('vui long nhap so co ba chu so');
readln;
end.

Câu 4:

uses crt;
var a,s:longint;
begin
clrscr;
s:=1;
write('so thu 1:'); readln(a);
s:=s*a;
write('so thu 2:'); readln(a);
s:=s*a;
write('so thu 3:'); readln(a);
s:=s*a;
write('so thu 4:'); readln(a);
s:=s*a;
writeln('trung binh nhan cua 4 so la: ',s/4:4:2);
readln;
end.

Câu 5:

uses crt;
var a,s:longint;
begin
clrscr;
s:=0;
write('so thu 1:'); readln(a);
s:=s+a;
write('so thu 2:'); readln(a);
s:=s+a;
write('so thu 3:'); readln(a);
s:=s+a;
write('so thu 4:'); readln(a);
s:=s+a;
writeln('trung binh cong cua 4 so la: ',s/4:4:2);
readln;
end.