Bài 1: Viết CT nhập vào 2 số nguyên dương a, b (a

viết ct nhập mảng 1c gồm 200 pt thuộc kiểu nguyên sau đó a. tìm số dương đầu tiên và chỉ số của nó trong mảng b. tìm số dương cuối cùng và chỉ số của nó trong mảng bài 2 viết ct nhập mảng 1c gồm 100pt thuộc kiểu nguyên a. in ra màn hình danh sách các số chẳn b. in ra màn hình các số từ 1 đến 10

0

LM

Le MNguyệt

4 tháng 3 2021

1

NL

Nguyễn Lê Phước Thịnh

4 tháng 3 2021

Bài 1:

uses crt;

var c:aray[1..200]of integer;

i,vt1,vt2:integer;

begin

clrscr;

for i:=1 to 200 do

begin

write('C[',i,']='); readln(c[i]);

end;

for i:=1 to 200 do

if c[i]>0 then

begin

vt1:=i;

break;

end;

if vt1=0 then writeln('Khong co so duong trong day')

else writeln('So duong dau tien trong day la: ',c[vt1],' va chi so cua no la: ',vt1);

for i:=200 downto 1 do

if c[i]>0 then

begin

vt2:=i;

break;

end;

if vt2=0 then writeln('Khong co so duong trong day')

else writeln('So duong cuoi cung trong day la: ',c[vt2],' va vi tri cua no la: ',vt2);

readln;

end.

Bài 1: Viết CT nhập vào 2 số nguyên dương a, b (a<b), tính và đưa ra màn hình tổng các số chẵn và tổng các số lẻ trong phạm vi từ a đến b.a) ý tưởngb) xác định bài toánc) thuật toánBài 2: Ông Ba có số tiền là S, ông gửi tiết kiệm ngân hàng với lãi suất 1.5%/tháng. Hỏi sau 12 tháng gửi (không rút tiền lãi hàng tháng), ông ta được số tiền là bao nhiêu?a) ý tưởngb) xác định bài toánc) thuật...

NT

Nguyễn Tiến Đạt

27 tháng 11 2021

Đọc tiếp

0

P

phamthiminhanh

5 tháng 5 2021

Bài 1: Viết chương trình nhập số nguyên dương n. Tính tổng các số chẫn chia hết cho 3 nhỏ hơn hoặc bằng n

Bài 2: Viết chương trình nhập vào 3 số nguyên dương a, b, c. Tìm ước chung lớn nhất của 3 số

3

NL

Nguyễn Lê Phước Thịnh

5 tháng 5 2021

Bài 1:

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

for i:=1 to n do

if i mod 6=0 then s:=s+i;

writeln(s);

readln;

end.

NL

Nguyễn Lê Phước Thịnh

5 tháng 5 2021

Bài 2:

uses crt;

var a,b,c,ucln,i:integer;

begin

clrscr;

write('a='); readln(a);

write('b='); readln(b);

write('c='); readln(c);

while a<>b do

begin

if a>b then a:=a-b

else b:=b-a;

end;

ucln:=a;

while ucln<>c do

begin

if ucln>c then ucln:=ucln-c

else c:=c-ucln;

end;

writeln(ucln);

readln;

end.

P

phamthiminhanh

19 tháng 1 2021

Câu 1: Viết chương trình nhập vào 2 số nguyên a,b. Kiểm tra a,b cùng dáu hay trái dấu ( cùng âm hoặc cùng dương hoặc âm, dương hoặc dương, âm)

Câu 2: Viết chương trình nhập vào 2 số nguyên a,b. Kiểm tra tính chẵn lẻ ( cùng lẻ hoặc cùng chẵn hoặc.......)

1

NL

Nguyễn Lê Phước Thịnh

20 tháng 1 2021

Câu 1:

uses crt;

var a,b:integer;

begin

clrscr;

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

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

if (a>0) and (b>0) then writeln('Cung duong');

if (a<0) and (b<0) then writeln('Cung am');

if (a>0) and (b<0) then writeln('Duong am');

if (a<0) and (b>0) then writeln('Am duong');

readln;

end.

Câu 2:

uses crt;

var a,b:integer;

begin

clrscr;

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

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

if (a mod 2=0) and (b mod 2=0) then writeln('Cung chan');

if (a mod 2<>0) and (b mod 2<>0) then writeln('Cung le');

if (a mod 2=0) and (b mod 2<>0) then writeln('Chan le');

if (a mod 2<>0) and (b mod 2=0) then writeln('Le chan');

readln;

end.

AA

Alo Alo

21 tháng 1 2021

ko hiểu gì

Đúng(0)

BL

Bùi Lê Thanh Trúc

9 tháng 4 2022

Viết CT nhập vào số nguyên dương n(n được nhập giá trị từ bàn phím), sau đó thực hiện các yêu cầu sau: a, nếu n=0 thì yêu cầu nhập lại số n b, tính tổng các số chẵn từ 1 đến n vừa nhập c, tính tích các số lẻ từ 1 đến n vừa nhập D, in các giá trị vừa tính được ra màn hình

1

NL

Nguyễn Lê Phước Thịnh

9 tháng 4 2022

uses crt;

var n,i,t,s:integer;

begin

clrscr;

repeat

readln(n);

until n<>0;

t:=0;

for i:=1 to n do if i mod 2=0 then t:=t+i;

writeln(t);

s:=1;

for i:=1 to n do

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

writeln(s);

readln;

end.

1Q

12: Quách Hà

16 tháng 2 2023

viết ct nhập từ bàn phím số nguyên dương N ( N<100) và dãy A gồm N số dương A1,A2,...An. hãy in mảng vừa nhập

1

NL

Nguyễn Lê Phước Thịnh

17 tháng 2 2023

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,A[100];

cin>>n;

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

cin>>A[i];

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

cout<<A[i]<<" ";

return 0;

}

Đúng(0)

TA

Trúc Anh

12 tháng 3 2023

Viết CT nhập vào 1 số nguyên dương n, rồi xuất ra màn hình : +tổng các số chẵn từ 1 đến n + Số các số chẵn từ 1 đến n

0

H

Hương

16 tháng 12 2021

Viết CT nhập từ bàn phím 3 số nguyên dương A, B, C. In ra màng hình số nhỏ nhất.

làm dùm mik nha <3

1

NL

Nguyễn Lê Phước Thịnh

17 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long a,b,c;

int main()

{

cin>>a>>b>>c;

cout<<max(a,max(b,c));

return 0;

}

NV

Nhật Vy

23 tháng 2 2023

Viết CT nhập vào mảng 1 chiều các số nguyên. a. Tính tổng các số chẵn b. Hiển thị các số ở vị trí lẻ