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.

23 tháng 11 2021

Program HOC24;

var tbc: real;

a,b: integer;

begin

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

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

tbc:=(a+b)/2;

write('Trung binh cong cua 2 so nguyen la: ',tbc:8:2);

readln

end.

30 tháng 10 2021

Câu 1: 

#include <bits/stdc++.h>

using namespace std;

double a,b,c;

int main()

{

cin>>a>>b>>c;

cout<<fixed<<setprecision(2)<<(a+b+c)/3;

return 0;

}

3 tháng 5

nbbnbnbbnn\(\dfrac{^{ }}{ }\)

7 tháng 5 2023

program TinhTBCTimSoNT;

var
  ten, lop: string;
  n, i, tong, dem: integer;
  A: array [1..11] of integer;
  trung_binh: real;

function LaSoNguyenTo(x: integer): boolean;
var
  i: integer;
begin
  if x < 2 then
    LaSoNguyenTo := false
  else if x = 2 then
    LaSoNguyenTo := true
  else if x mod 2 = 0 then
    LaSoNguyenTo := false
  else
  begin
    i := 3;
    while (i <= trunc(sqrt(x))) and (x mod i <> 0) do
      i := i + 2;
    LaSoNguyenTo := x mod i <> 0;
  end;
end;

begin
  // Nhập tên và lớp của học sinh
  write('Nhập tên của học sinh: ');
  readln(ten);
  write('Nhập lớp: ');
  readln(lop);

  // Nhập dãy số nguyên và tính trung bình cộng
  repeat
    write('Nhập số phần tử của dãy số (n<12): ');
    readln(n);
  until n < 12;
  tong := 0;
  for i := 1 to n do
  begin
    write('Nhập phần tử thứ ', i, ': ');
    readln(A[i]);
    tong := tong + A[i];
  end;
  trung_binh := tong / n;

  // In tên, lớp, dãy số và trung bình cộng ra màn hình
  writeln('Học sinh: ', ten);
  writeln('Lớp: ', lop);
  write('Dãy số: ');
  for i := 1 to n do
    write(A[i], ' ');
  writeln;
 
  // In các số nguyên tố của dãy số ra màn hình
  writeln('Các số nguyên tố của dãy số:');
  for i := 1 to n do
    if LaSoNguyenTo(A[i]) then
      writeln(A[i]);
end.

23 tháng 5 2022

program trungbinh;

uses crt;

var n,i: integer;

      s:real;

      A: array[1..1000] of integer;

begin

clrscr;

write('Nhap do dai day: '); readln(n);

writeln('Nhap gia tri cua day: ');

S:=0;

for i:=1 to n do

begin

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

readln(A[i]);

S:=S+A[i];

end;

S:=S/n;

write('Trung binh cua cac so cua day do la: ',S);

readln;

end.

Tin học 8Câu 2: Viết chương trình tính tích 2 số nguyên được nhập từ bàn phím. Câu 3: Viết chương trình tính chu vi P, diện tích S của hình vuông, biết độ dài cạnh a = 8. In kết quả ra màn hình. Câu 4: Viết chương trình tính trung bình cộng của ba số. (Cho biết: ba số đó là a,b,c được nhập từ bàn phím). Câu 5: Viết chương trình tính tiền hóa đơn mua một món hàng, biết phí ship của hóa đơn là 10.000đ và công thức tính...
Đọc tiếp

Tin học 8

Câu 2: Viết chương trình tính tích 2 số nguyên được nhập từ bàn phím. Câu 3: Viết chương trình tính chu vi P, diện tích S của hình vuông, biết độ dài cạnh a = 8. In kết quả ra màn hình. Câu 4: Viết chương trình tính trung bình cộng của ba số. (Cho biết: ba số đó là a,b,c được nhập từ bàn phím). Câu 5: Viết chương trình tính tiền hóa đơn mua một món hàng, biết phí ship của hóa đơn là 10.000đ và công thức tính tiền là: Thành tiền = đơn giá * số lượng + phí dịch vụ Câu 6: An và Bình được phân công đi mua quà cho lớp nhân dịp tết Trung thu. Hai bạn chọn mua vở với giá 5000 đồng/ quyển và bút bi với giá 3000 đồng/ cây. Em hãy viết chương trình tính số tiền 2 bạn phải trả khi mua x quyển vở và y cây bút bi.(số lượng quyển vở là x, số lượng bút bi là y được nhập từ bàn phím). Cảm ơn nhiều

2
5 tháng 11 2021

giải giúp tôi với

 

 

Câu 2: 

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a*b;

return 0;

}

21 tháng 6 2020

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.

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.

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a+b<<endl;

cout<<a-b;

return 0;

}

12 tháng 5 2023

``python
def UCLN(a, b):
if b == 0:
return a
else:
return UCLN(b, a % b)
a = int(input("Nhập số nguyên a: "))
b = int(input("Nhập số nguyên b: "))
benn = (a * b) // UCLN(a, b)
print("BCNN của", a, "và", b, "là:", bann)

12 tháng 5 2023

Dạ chỉ em viết dạng chương trình lớp 8 đc k ạ, tại em chx hc python ạ

uses crt;

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

i,n,t:integer;

begin

clrscr;

readln(n);

for i:=1 to n do 

begin

readln(a[i]);

end;

for i:=1 to n do 

  write(a[i]:4);

readln;

t:=0;

for i:=1 to n do 

 t:=t+a[i];

writeln(t/n:4:2);

readln;

end.