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.
Câu 1:
uses crt;
var a:array[1..5]of integer;
max,i:integer;
begin
clrscr;
for i:=1 to 5 do
begin
write('A[',i,']='); readln(a[i]);
end;
max:=a[1];
for i:=1 to 5 do
if max<a[i] then max:=a[i];
writeln(max);
readln;
end.
Câu 2:
uses crt;
var a:array[1..6]of integer;
min,i:integer;
begin
clrscr;
for i:=1 to 6 do
begin
write('A[',i,']='); readln(a[i]);
end;
min:=a[1];
for i:=1 to 6 do
if min>a[i] then min:=a[i];
writeln(min);
readln;
end.
Program Trungbinhcong;
Uses crt;
Var a,b,c,d,tb: integer;
Begin
Clrscr;
Write('Nhap so thu nhat:'); Readln(a);
Write('Nhap so thu hai:'); Readln(b);
Write('Nhap so thu ba:'); Readln(c);
Write('Nhap so thu tu:'); Readln(d);
tb:=(a+b+c+d)/4;
Writeln('Trung binh cong cua 4 so la:',tb:4:2);
Readln
End.
Python:
# Nhập vào dãy số
n = int(input("Nhập vào số lượng phần tử của dãy số: "))
numbers = []
for i in range(n):
number = int(input(f"Nhập vào phần tử thứ {i+1}: "))
numbers.append(number)
# Tìm giá trị nhỏ nhất của dãy số
min_value = min(numbers)
# In ra kết quả
print("Giá trị nhỏ nhất của dãy số là:", min_value)
C++:
#include <iostream>
#include <vector>
#include <algorithm>
int main() {
// Nhập vào dãy số
int n;
std::cout << "Nhap vao so luong phan tu cua day so: ";
std::cin >> n;
std::vector<int> numbers;
for (int i = 0; i < n; ++i) {
int number;
std::cout << "Nhap vao phan tu thu " << i+1 << ": ";
std::cin >> number;
numbers.push_back(number);
}
// Tìm giá trị nhỏ nhất của dãy số
int min_value = *std::min_element(numbers.begin(), numbers.end());
// In ra kết quả
std::cout << "Gia tri nho nhat cua day so la: " << min_value << std::endl;
return 0;
}
Java:
import java.util.ArrayList;
import java.util.List;
import java.util.Scanner;
public class Main {
public static void main(String[] args) {
// Nhập vào dãy số
Scanner scanner = new Scanner(System.in);
System.out.print("Nhap vao so luong phan tu cua day so: ");
int n = scanner.nextInt();
List<Integer> numbers = new ArrayList<>();
for (int i = 0; i < n; ++i) {
System.out.print("Nhap vao phan tu thu " + (i + 1) + ": ");
int number = scanner.nextInt();
numbers.add(number);
}
// Tìm giá trị nhỏ nhất của dãy số
int min_value = numbers.stream().min(Integer::compareTo).get();
// In ra kết quả
System.out.println("Gia tri nho nhat cua day so la: " + min_value);
}
}
Ruby:
# Nhập vào dãy số
print "Nhap vao so luong phan tu cua day so: "
n = gets.chomp.to_i
numbers = []
(1..n).each do |i|
print "Nhap vao phan tu thu #{i}: "
number = gets.chomp.to_i
numbers << number
end
# Tìm giá trị nhỏ nhất của dãy số
min_value = numbers.min
# In ra kết quả
puts "Gia tri nho nhat cua day so la: #{min_value}"
Pascal:
program TimGiaTriNhoNhat;
var
n, i, min_value, number: integer;
begin
// Nhập vào số lượng phần tử của dãy số
write('Nhap vao so luong phan tu cua day so: ');
readln(n);
// Nhập vào dãy số
min_value := MaxInt;
for i := 1 to n do
begin
write('Nhap vao phan tu thu ', i, ': ');
readln(number);
if number < min_value then
min_value := number;
end;
// In ra kết quả
writeln('Gia tri nho nhat cua day so la: ', min_value);
end.
Sai sót thì sử dụng kiến thức đã có để sửa nó nhe.
uses crt;
var a:array[1..100]of integer;
i,n,t,ln,nn:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if a[i]>0 then t:=t+a[i];
ln:=a[1];
nn:=a[1];
for i:=1 to n do
begin
if ln<a[i] then ln:=a[i];
if nn>a[i] then nn:=a[i];
end;
writeln(t);
writeln(ln);
writeln(nn);
readln;
end.
program TimMinMaxTrungBinh;
var
N, i, max, min, sum: integer;
a: array[1..50] of integer;
TB, minTB, maxTB: real;
begin
writeln('Nhap so nguyen duong N:');
readln(N);
sum := 0;
for i := 1 to N do
begin
write('Nhap so thu ', i, ': ');
readln(a[i]);
sum := sum + a[i];
end;
max := a[1];
min := a[1];
for i := 2 to N do
begin
if a[i] > max then
max := a[i];
if a[i] < min then
min := a[i];
end;
TB := sum / N;
minTB := TB;
maxTB := TB;
for i := 1 to N do
begin
if (a[i] < TB) and (a[i] < minTB) then
minTB := a[i];
if (a[i] > TB) and (a[i] > maxTB) then
maxTB := a[i];
end;
writeln('Gia tri lon nhat la: ', max);
writeln('Gia tri nho nhat la: ', min);
writeln('Gia tri trung binh la: ', TB:2:2);
if minTB = TB then
writeln('Khong co gia tri nao nho hon TB')
else
writeln('Gia tri nho nhat < TB la: ', minTB);
if maxTB = TB then
writeln('Khong co gia tri nao lon hon TB')
else
writeln('Gia tri lon nhat > TB la: ', maxTB);
readln;
end.
Câu 2:
Program nii;
Uses crt;
Var a,b,c,A:integer;
Begin
Write ('nhap a');
Readln (a);
Write ('nhap b');
Readln (b);
Write ('nhap c');
Readln (c);
A:=a;
If A<b then A:=b;
If A<c then A:=c;
Write ('Ket qua',A);
Readln;
End.
Câu 1
Program ntg;
Uses crt;
Var A,x,y:integer;
Begin
Write ('nhap x');
Readln (x);
Write ('nhap y');
Readln ('y');
A:=x+y;
Write ('Ket qua',A);
Readln;
End.
Mình sử dụng ngôn ngữ c++:
#include <bits/stdc++.h>
using namespace std;
long long a[5];
int main()
{
for(int i=1;i<=4;i++){
cin>>a[i];
}
sort(a+1,a+5);
cout<<a[1];
return 0;
}