Tệp và thao tác với tệp

Trong các cách viết sau, cách viết nào là tên của tệp?

A. baivan.doc; B. Toanhoc; C. Thuvien*pas; D. Baihat_doc.

A. Bạn

Baby Girl

A

đúng quy cách là chữ cái đầu viết hoa phải k?

program hinh_vuong;

uses crt;

var a,chuvi,dt:word;

begin

clrscr;

write('nhap do dai canh cua hinh vuong:');

readln(a);

chuvi:=a*4;

dt:=a*a;

writeln('chu vi hinh vuong la:',chuvi);

write('dien tich hinh vuong la:',dt);

readln;

end.

python nhe

assign(input,'file.inp'); reset(input);

assign(output,'file.out'); rewrite(output);

readln(m);

read(N);

dễ mà bạn!

Bài 1:

uses crt;
const fo='songuyen.inp';
var f:text;
a,b:integer;
begin
clrscr;
assign(f,fo); rewrite(f);
write('nhap a='); readln(a);
write('nhap b='); readln(b);
writeln(f,a,' ',b);
close(f);
readln;
end.

Bài 2:

const fi='songuyen.inp';
fo='songuyen.out';
var f1,f2:text;
a,b,t:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,a,b);
writeln(f2,a+b);
close(f1);
close(f2);
end.

Bài 1:

uses crt;

const fi='songuyen.inp';

var f1:text;

a,b:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

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

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

write(f1,a,' ',b);

close(f1);

readln;

end.

Bài 2:

const fi='songuyen.inp';

fo='songuyen.out';

var f1,f2:text;

a,b,t:integer;

begin

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

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

readln(f1,a,b);

t:=a+b;

writeln(f2,t);

close(f1);

close(f2);

end.

#include <iostream>

#include <fstream>

using namespace std;

ifstream input("D:/input.txt");

ofstream output("D:/ouput.txt");

int main()

{   

    int A[1000];

    int n ,dem=0;

    input >> n;

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

        input >> A[i];   

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

           if(A[i]<0)           

              dem +=A[i]; 

    output << dem; 

     return 0;

}

uses crt;

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

i,n,t:integer;

begin

clrscr;

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

for i:=1 to n do 

begin

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

end;

t:=0;

for i:=1 to n do 

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

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

readln;

end.