Chủ đề / Chương

Bài học

Hãy tham gia nhóm Học sinh Hoc24OLM
Nya arigatou~
Viết chương trình C++ sử dụng các hàm và thủ tục xây dựng ở trên để giải bài toán: Cho tệp dữ liệu TAMGIAC.DAT có cấu trúc như sau:- Dòng đầu tiên chứa số N;- N dòng tiếp theo, mỗi dòng chứa 6 số thực xA, yA, xB, yB, xC, yC là tọa độ 3 đỉnh A(xA, yA), B(xB, yB), C(xC, yC) của tam giác ABCHãy nhập dữ liệu từ tệpđã cho và trong số N tam giác đó, đưa ra tệp TAMGIAC.OUT gồm 3 dòng:- Dòng đầu tiên là số lượng tam giác đều;- Dòng thứ 2 là số lượng tam giác cân (nhưng không là đều);- Dòng thứ 3 là số l...
Đọc tiếp
Lớp 11 Tin học Chương trình con và lập trình có cấu trúc
Những câu hỏi liên quan
Nya arigatou~
Viết chương trình sử dụng các hàm và thủ tục xây dựng ở trên để giải bài toán: Cho tệp dữ liệu TAMGIAC.DAT có cấu trúc như sau:- Dòng đầu tiên chứa số N;- N dòng tiếp theo, mỗi dòng chứa 6 số thực xA, yA, xB, yB, xC, yC là tọa độ 3 đỉnh A(xA, yA), B(xB, yB), C(xC, yC) của tam giác ABCHãy nhập dữ liệu từ tệpđã cho và trong số N tam giác đó, đưa ra tệp TAMGIAC.OUT gồm 3 dòng:- Dòng đầu tiên là số lượng tam giác đều;- Dòng thứ 2 là số lượng tam giác cân (nhưng không là đều);- Dòng thứ 3 là số lượng...
Đọc tiếp
Xem chi tiết
Lớp 11 Tin học Chương trình con và lập trình có cấu trúc

Khách
 
Nguyễn Lê Phước Thịnh
4 tháng 4 2021 lúc 13:16

const fi='tamgiac.dat'

      fo='tamgiac.out'

var f1,f2:text;

    a,b,c,d,e,f:array[1..100]of integer;

    i,n,dem1,dem2,dem3:integer;

    ab,bc,ac:real;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

for i:=1 to n do

  readln(f1,a[i],b[i],c[i],d[i],e[i],f[i]);

dem1:=0;

dem2:=0;

dem3:=0;

for i:=1 to n do

  begin

     ab:=sqrt(sqr(a[i]-c[i])+sqr(b[i]-d[i]));

     ac:=sqrt(sqr(a[i]-e[i])+sqr(b[i]-f[i]));

     bc:=sqrt(sqr(c[i]-e[i])+sqr(d[i]-f[i]));

     if (ab>0) and (ac>0) and (bc>0) and (ab+ac>bc) and (ab+bc>ac) and

(ac+bc>ab) then

        begin

           if (ab=ac) or (ac=bc) then inc(dem1);

           if ((ab=ac) and (ab<>bc) and (ac<>bc)) then inc(dem2);

           if ((ac=bc) and (bc<>ab) and (ac<>ab)) then inc(dem2);

           if ((ac=bc) and (ac<>ab) and (bc<>ab)) then inc(dem2);

           if sqr(ab)=sqr(ac)+sqr(bc) then inc(dem3);

           if sqr(ac)=sqr(bc)+sqr(ab) then inc(dem3);

           if sqr(bc)=sqr(ab)+sqr(ac) then inc(dem3);

        end;

  end;

writeln(f2,dem1);

writeln(f2,dem2);

writeln(f2,dem3);

close(f1);

close(f2);

end.

Bình luận (0)
Ngọc Diệp

cho dãy số gồm N số tự nhiên a1,a2,a3,...aN .Viết chương trình in ra trung bình cộng của các phần tử trên .Dữ liệu vào bởi tệp DULIEU.INP có cấu trúc : dòng đầu tiên chứa số nguyên N ,dòng thứ 2 chứa các số a1,a2,a3,...aN các số cách nhau ít nhất một kí tự trống

Xem chi tiết
Lớp 11 Tin học Chương trình con và lập trình có cấu trúc

Khách
 
nguyễn an phát
12 tháng 5 2021 lúc 20:24

program du_lieu;

uses crt;

var i,n:integer;

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

tbc:real;

f:text;

begin

clrscr;

assign(f,'DULIEU.INP');reset(f);

readln(f,n);

for i:=1 to n do

begin

read(f,a[i]);

end;

close(f);

for i:=1 to n do

tbc:=tbc+a[i];

writeln(tbc/n);

readln;

end.

Bình luận (0)
Đặng Minh quân

Cho dãy gồm N số tự nhiên a1,a2,a3...aN. viết chương trình in ra tổng các số âm,số dương của Dữ liệu vào cho bởi tệp DULIEU.INP có cấu trúc - dòng đầu tiên chứa số N - dòng thứ 2 chứa các số a1,a1,s3...aN các số cách nhau ít nhất 1 kí tự trống

Xem chi tiết
Lớp 11 Tin học

Khách
 
Nguyễn Lê Phước Thịnh
12 tháng 5 2021 lúc 18:41

uses crt;

const fi='dulieu.inp'

var f1:text;

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

n,i,t1,t2:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

readln(f1,n);

for i:=1 to n do 

  read(f1,a[i]);

t1:=0;

t2:=0;

for i:=1 to n do 

 begin

if a[i]>0 then t1:=t1+a[i];

if a[i]<0 then t2:=t2+a[i];

end;

writeln('Tong cac so duong la: ',t1);

writeln('Tong cac so am la: ',t2);

close(f1);

readln;

end.

Bình luận (0)
Felix MC-Gamer
Cho tệp văn bản DAYSO.INP có cấu trúc: + Dòng 1: Ghi số nguyên dương N  (0N100) + Dòng 2: Ghi dãy gồm n số nguyên Ai (-30000Ai30000). Yêu cầu: Viết chương trình đọc dữ liệu từ tệp trên và thực hiện các công việc sau:a) Tính tổng các số ở dòng 2, ghi kết quả vào tệp TONG.OUT theo cấu trúc:+ Dòng 1: Ghi số nguyên S là tổng tìm được b) Tính tổng các số dương ở dòng 2, ghi kết quả vào tệp TD.OUT theo cấu trúc:+ Dòng 1: Ghi số nguyên S là tổng các số dương tìm được c) Đếm số lượng các số chẵn ở dòng...
Đọc tiếp
Xem chi tiết
Lớp 11 Tin học Bài 15: Thao tác với tệp

Khách
 
Lê Thị Hồng Trang

giả sử trên đĩa E có tệp SO.INP chứa nhiều dòng dữ liệu, mỗi dòng chứa hai số nguyên cách nhau bởi dấu cách. hãy viết chương trình đọc ra mỗi dòng dữ liệu trong tệp SO.INP, sau đó tính trung bình cộng của mỗi dòng và hiển thị kết quả trung bình cộng ra màn hình tương ứng với mỗi dòng dữ liệu? Mn giúp mik vs

Xem chi tiết
Lớp 11 Tin học Bài 16: Ví dụ làm việc với tệp

Khách
 
Nguyễn Lê Phước Thịnh
31 tháng 3 2022 lúc 22:46

uses crt;

const fi='so.inp'

var f1:text;

a,b:integer;

begin

clrscr;

assign(f1,fi); reset(f1);

while not eof(f1) do 

 begin

readln(f1,a,b);

writeln((a+b)/2:4:2);

end;

close(f1);

readln;

end.

Bình luận (0)
Minh Hoạt
BÀI TẬP THỰC HÀNH – DỮ LIỆU KIỂU TỆP Câu 1: Cho tệp BAI1.INP có cấu trúc như sau:- Gồm 1 dòng chứa độ dài 2 cạnh của hình chữ nhậtEm hãy lập chương trình tính diện tích hình chữ nhật đó . Kết quả in ra màn hình đúng đến 2 chữ số thập phân? Câu 2: Cho tệp BAI2.INP có cấu trúc như sau:- Gồm 1 dòng chứa độ dài 2 cạnh của hình chữ nhậtEm hãy lập chương trình tính diện tích hình chữ nhật đó . Kết quả ghi vào tệp BAI2.OUTđúng đến 2 chữ số thập phân? Câu 3: Cho tệp BAI3.INP có cấu trúc như sau:- Gồm N...
Đọc tiếp
Xem chi tiết
Lớp 11 Tin học

Khách
 
Nguyễn Lê Phước Thịnh
23 tháng 4 2021 lúc 20:54

Câu 1: 

uses crt;

const fi='bai1.inp'

var f1:text;

a,b:real;

begin

clrscr;

assign(f1,fi); reset(f1);

readln(f1,a,b);

writeln(a*b:4:2);

close(f1);

readln;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
23 tháng 4 2021 lúc 20:57

Câu 2: 

const fi='bai2.inp'

fo='bai2.out'

var f1,f2:text;

a,b:real;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,a,b);

writeln(f2,a*b:4:2);

close(f1);

close(f2);

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
23 tháng 4 2021 lúc 20:57

Câu 3: 

const fi='bai3.inp'

fo='bai3.out'

var f1,f2:text;

a,b:array[1..100]of real;

i,n:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

n:=0;

while not eof(f1) do 

  begin

n:=n+1;

readln(f1,a[n],b[n]);

end;

for i:=1 to n do  

  writeln(f2,a[i]*b[i]:4:2);

close(f1);

close(f2);

end.

Bình luận (0)
Xem thêm câu trả lời
hoquanghieu

cho mảng số nguyên A gồm n phần tử (N<=100) viết chương trình thực hiện các yêu cầu sau:

-viết thủ tục nhập dữ liệu cho mảng A

-sử dụng thủ tục để sắp xếp lại các mảng theo thứ tự không tăng

Xem chi tiết
Lớp 11 Tin học

Khách
 
Nguyễn Giang Ank
12 tháng 4 2022 lúc 21:42

uses crt;

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

i,n,dem,t,tb:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

dem:=0;

t:=0;

for i:=1 to n do 

  if a[i]>0 then

begin

dem:=dem+1;

t:=t+a[i];

end;

writeln('So luong phan tu duong la: ',dem);

writeln('Tong cac phan tu duong la: ',t);

writeln('Trung binh cac phan tu duong la: ',t/dem:4:2);

readln;

end.

Bình luận (1)
Nguyễn Lê Phước Thịnh
13 tháng 4 2022 lúc 18:22

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n;

int main()

{

cin>>n;

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

sort(a+1,a+n+1);

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

return 0;

}

Bình luận (0)
Trần Thị Hương

Viết chương trình táo ra một tệp chứa một mảng số nguyên không quá 100 phần tử . Tiến hành mở tệp ra để đọc dữ liệu và tính tổng các phần tử của mảng tất cả đều sử dụng thủ tục để viết chương trình

Xem chi tiết
Lớp 11 Tin học Bài 18: Ví dụ về cách viết và sử dụng chương trìn...

Khách
 
Minh Lệ
10 tháng 5 2020 lúc 11:23

Program hotrotinhoc_hoc24;

const fi='dlv.inp';

fo='dlr.out';

var i,n,t: integer;

f: text;

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

procedure ip;

begin

assign(f,fi);

reset(f);

readln(f,n);

for i:=1 to n do read(f,a[i]);

close(f);

end;

procedure out;

begin

assign(f,fo);

rewrite(f);

t:=0;

for i:=1 to n do t:=t+a[i];

write(f,t);

close(f);

end;

begin

ip;

out;

end.

Bình luận (0)
Minh Lệ

Một CSDL lưu dữ liệu trên hệ thống máy tính dưới dạng các tệp có cấu trúc được thiết kế để nhiều ngưới dùng có thể cùng khai thác dữ liệu trong CSDL đó. Tuy nhiên không phải tất cả người dùng đều biết về cấu trúc các tệp lưu dữ liệu và tự viết chương trình khai thác dữ liệu. Theo em, có thể giải quyết vấn đề này như thế nào?

Xem chi tiết
Lớp 11 Tin học Bài 12: Hệ quản trị cơ sở dữ liệu và hệ cơ sở dữ l...

Khách
 
Thanh An
22 tháng 8 2023 lúc 21:44

Lưu dữ liệu dưới dạng 1 phần mềm hệ thống quản trị mà ai cũng có thể dễ dàng khai thác.

Bình luận (0)

Khoá học trên OLM (olm.vn)