Viết chương trình nhập bàn phím 2 số nguyên a,b. Xuất ra màn hình thương của a,b
Những câu hỏi liên quan
a) viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số nhỏ nhất.
b) viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số lớn nhất.
program hello;
uses crt;
Var n,i,j,k: integer;
a: array[1..50] of integer;
begin;
a[1]:=k;
Readln(n);
For i:=1 to n do
Begin;
Writeln('nhap a[',i,'] '); Readln(a[i]);
End;
For i:=1 to n-1 do
For j:=i+1 to n do
If a[i]<a[j] then k:=a[j];
Writeln('gia tri lon nhat la', k);
end.
a) Viết chương tình nhập vào từ bàn phím mảng A gồm n số nguyên.In ra màn hình số nguyên lớn nhất
b) Viết chương trình nhập vào từ bàn phím mảng B gồm n số nguyên.In ra màn hình số nguyên bé nhất
a)
uses crt;
var a:array[1..100]of integer;
i,n,max:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=1 to n do
if max<a[i] then max:=a[i];
writeln(max);
readln;
end.
Đúng 0
Bình luận (0)
b)
uses crt;
var a:array[1..100]of integer;
i,n,min:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
min:=a[1];
for i:=1 to n do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Đúng 0
Bình luận (0)
Bài 1: Viết chương trình Pascal nhập số từ bàn phím. Xuất ra màn hình:+ Tính n!+ Nhập số x từ bàn phím.Tính nxBài 2: Viết chương trình Pascal nhập số n từ bàn phím. Xuất ra màn hình + Dòng 1: Các ước của n+ Dòng 2: Nếu n là số lẻ thì xuất ra màn hình các số nguyên tố từ 2 đến n+ Dòng 3: Nếu n là chẵn thì xuất ra màn hình các số hoàn hảo từ 1 đến n+ Dòng 4: Tổng các ước của n( 2 bài khác nhau mọi người làm riêng ra giúp mình ạaaaaaa)
Đọc tiếp
Bài 1: Viết chương trình Pascal nhập số từ bàn phím. Xuất ra màn hình:
+ Tính n!
+ Nhập số x từ bàn phím.Tính nx
Bài 2: Viết chương trình Pascal nhập số n từ bàn phím. Xuất ra màn hình
+ Dòng 1: Các ước của n
+ Dòng 2: Nếu n là số lẻ thì xuất ra màn hình các số nguyên tố từ 2 đến n
+ Dòng 3: Nếu n là chẵn thì xuất ra màn hình các số hoàn hảo từ 1 đến n
+ Dòng 4: Tổng các ước của n
( 2 bài khác nhau mọi người làm riêng ra giúp mình ạaaaaaa)
Chương trình sau thực hiện việc gì? *A Nhập 2 số bất kỳ từ bàn phímB Nhập 2 số nguyên từ bàn phím, thông báo ra màn hình tổng - hiệu - tích - thương (nguyên) của chúngC Nhập 2 số nguyên từ bàn phím, thông báo ra giá trị của chúng ra màn hìnhD Nhập 2 số nguyên từ bàn phím, tính tổng - hiệu - tích - thương (nguyên) của chúng
Đọc tiếp
Chương trình sau thực hiện việc gì? *
A Nhập 2 số bất kỳ từ bàn phím
B Nhập 2 số nguyên từ bàn phím, thông báo ra màn hình tổng - hiệu - tích - thương (nguyên) của chúng
C Nhập 2 số nguyên từ bàn phím, thông báo ra giá trị của chúng ra màn hình
D Nhập 2 số nguyên từ bàn phím, tính tổng - hiệu - tích - thương (nguyên) của chúng
Viết chương trình nhập vào 2 số d và b từ bàn phím xuất xuất ra màn hình số a nếu a>b ngược lại xảy ra b
uses crt;
var a,b:integer;
begin
clrscr;
write('Nhap a='); readln(a);
write('Nhap b='); readln(b);
if a>b then writeln(a)
else writeln(b);
readln;
end.
Đúng 1
Bình luận (0)
viết chương trình nhập mảng 1 chiều A gồm m số nguyên từ bàn phím. Đếm số lần xuất hiện của X trong mảng A. với X là số nguyên nhập từ bàn phím. Xất kết quả ra màn hình
Program HOC24;
var m,i,d: integer;
a: array[1..32000] of integer;
begin
write('Nhap m= '); readln(m);
for i:=1 to m do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Nhap X = '); readln(x);
d:=0;
for i:=1 to n do if a[i]=x then d:=d+1;
write(X,' xuat hien ',d,' lan trong mang');
readln
end.
Đúng 1
Bình luận (0)
Mng giúp mình các BT cuối kì vs ạ
Bài 1: Viết chương trình nhập từ bàn phím 2 số nguyên a,b; Sau đó ghi chúng vào tệp có tên D:Baitaptin.txt.
Bài 2: Viết chương trình nhập từ bàn phím 1 xâu không quá 180 kí tự; Xuất xâu vừa nhập ra màn hình rồi ghi xâu đó vào tệp có tên E:tepxau.txt.
Bài 3: Viết chương trình nhập từ bàn phím 2 số nguyên dương; Tính và ghi tổng của chúng vào tệp có tên ‘teptong.txt’ rồi xuất tổng ra màn hình.
Đọc tiếp
Mng giúp mình các BT cuối kì vs ạ Bài 1: Viết chương trình nhập từ bàn phím 2 số nguyên a,b; Sau đó ghi chúng vào tệp có tên D:\Baitaptin.txt. Bài 2: Viết chương trình nhập từ bàn phím 1 xâu không quá 180 kí tự; Xuất xâu vừa nhập ra màn hình rồi ghi xâu đó vào tệp có tên E:\tepxau.txt. Bài 3: Viết chương trình nhập từ bàn phím 2 số nguyên dương; Tính và ghi tổng của chúng vào tệp có tên ‘teptong.txt’ rồi xuất tổng ra màn hình.
Bài 3:
uses crt;
const fi='teptong.txt'
var a,b:integer;
f1:text;
begin
clrscr;
assign(f1,fi); rewrite(f1);
readln(a,b);
writeln(a+b);
writeln(f1,a+b);
close(f1);
readln;
end.
Đúng 0
Bình luận (0)
Bài 1: Viết chương trình nhập vào từ bàn phím các số thực a,b,c,d. Tính và đưa ra màn hình giá trị biểu thức: 2cb3 + 5cd4 – 3a? + bcd" - Bài 2: Viết chương trình nhập vào từ bàn phím 2 số nguyên m,n (n>0). Tính và đưa ra màn hình giá trị biểu thức nm-2 ~kíuuuuu~
Bài 2:
#include <bits/stdc++.h>;
using namespace std;
int main();
{
long m,n;
cout<<"Nhap m="; cin>>m;
cout<<"Nhap n="; cin>>n;
cout<<m*n-2;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình nhập vào 2 số nguyên a,b nhập từ bàn phím. Tính và in ra màn hình: Tổng 2 số đó, Tổng bình phương của 2 số đó
uses crt;
var a,b:integer;
begin
clrscr;
readln(a,b);
writeln('Tong hai so la: ',a+b);
writeln('Tong binh phuong hai so la: ',sqr(a)+sqr(b));
readln;
end.
Đúng 1
Bình luận (0)