Những câu hỏi liên quan
Chanronie
Xem chi tiết
Nguyễn Thị Hạnh
10 tháng 12 2021 lúc 15:11

B

Bình luận (1)
Chanronie
10 tháng 12 2021 lúc 15:12

Giúp mình với

Bình luận (0)
trần Thị Mỹ Duyên
Xem chi tiết
asuna
17 tháng 12 2017 lúc 9:20

Câu 1:
Var a:Integer;
Begin
Writeln('Nhap a: '); Readln(a);
If (a mod 2)=0 then writeln(a,'chia het cho 2') else (a,' khong chia het cho 2');
Readln;
End.

Câu 2:
Var S,a,b,c:Integer;
Begin
Writeln('Nhap a: '); readln(a);
Writeln('Nhap b: '); readln(b);
Writeln('Nhap c: '); readln(c);
S:=a+b+c;
Writeln('Tong cua ba so la: ',S);
Readln;
End.

Câu 3:
Var a,b,c:Integer;
Begin
Writeln('Nhap a: '); Readln(a);
Writeln('Nhap b: '); readln(b);
Writeln('Nhap c: '); readln(c);
If (a mod 2)=0 then writeln(a,' la so chan') else (a,' la so le');
If (b mod 2)=0 then writeln(b,' la so chan') else (b,' la so le');
If (c mod 2)=0 then writeln(c,' la so chan') else (c,' la so le');
Readln;
End.

Bình luận (2)
monsta x cho bi dien
17 tháng 12 2017 lúc 9:46

what dờ phắc

Bình luận (0)
trần Thị Mỹ Duyên
Xem chi tiết
ân
18 tháng 12 2017 lúc 14:34

1)Program songuyenduong;

Uses crt;

Var y: integer;

Begin

clrscr;

writeln('nhap so y'); readln(y);

if (y mode 5)=0 then writeln(y,'chia het cho 5')else write(y,' khong chia het cho 5');

readln;

End.

Bình luận (0)
ân
18 tháng 12 2017 lúc 14:40

2)

Program solonnhat;

uses crt;

var m,n,h,max: real;

Begin

clrscr;

writeln('nhap so m'); readln(m);

writeln('nhap so n'); readln(n);

writeln('nhap so h'); readln(h);

max:=m;

if m < n then max:=n;

if max < h then max=h then write('so lon nhat',max);

readln;

End.

Bình luận (2)
ân
18 tháng 12 2017 lúc 14:45

3)

Progam sapxep;

uses crt;

var x,y: integer;

begin

clrscr;

write('nhap so x'); readln(x);

write('nhap so y'); readln(y);

if x<y then write(x,' ',y);

if x>y then write(y,' ',x) else write(x,' ',y);

end.

Bình luận (2)
Nguyên GM Nguyễn
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 12 2021 lúc 22:10

#include <bits/stdc++.h>

using namespace std;

long long m,n;

int main()

{

cin>>m>>n;

if (m%n==0) cout<<m/n;

else if (n%m==0) cout<<n/m;

else cout<<m+n;

return 0;

}

Bình luận (0)
rip_indra
Xem chi tiết
Thế Thôi
20 tháng 4 2022 lúc 22:10


giới hạn của mảng là nhiu cx đc hả nêu có j thì bn thay vào nhábucminh

 

Bình luận (0)
Minh Khang-23- 86
Xem chi tiết
Nguyễn Lê Phước Thịnh
13 tháng 4 2022 lúc 18:20

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,dem;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

dem=0;

for (i=1; i<=n; i++)

if (a[i]%2!=0) dem++;

cout<<dem;

return 0;

}

Bình luận (0)
Minh Khang-23- 86
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 4 2022 lúc 22:13

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,dem;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++)

cout<<a[i]<<" ";

cout<<endl;

dem=0;

for (i=1; i<=n; i++)

if (a[i]%2==0) dem++;

cout<<dem;

return 0;

}

Bình luận (0)
PHẠM THU HÀ
Xem chi tiết
KhảTâm
7 tháng 3 2021 lúc 15:45

 Bài toán cổ nào vậy bạn?

Bình luận (0)
 Khách vãng lai đã xóa
Eriken
Xem chi tiết
Luân Đào
2 tháng 3 2019 lúc 18:45

program giai;

uses crt;

var A: real;

x,n: integer;

begin

clrscr;

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

write('Nhap x = '); read(x);

A:=1/(9*x+n);

write('Ket qua phep tinh A = ',A);

readln

end.

Bình luận (0)