07.11.2012 Робота з файлами |
|
|
|
Добавил(а) Гісь Ігор Володимирович
|
07.11.12 08:19 |
Робота з файлами
Pascal
|
C++
|
var f1,f2:text;
assign(f1,'input.dat');
reset(f1);
read(f1,...);
close(f1);
assign(f2,'output.dat');
rewite(f2);
write(f2,...);
close(f2);
|
#include <fstream.h>
void main()
{
ifstream inp;inp.open("input.dat");
int a,b,c;
inp>>a>>b;
inp.close();
c=a+b;
ofstream out;out.open("output.sol");
out<<c;
out.close();
}
|
assign(input,'input.dat');
reset(input);
read(...);
close(input);
assign(output,'output.dat');
rewite(output);
write(...);
close(output);
|
#include <fstream.h>
ifstream inp("input.dat");
ofstream out("output.sol");
void main()
{
int a,b,c;
inp>>a>>b;
c=a+b;
out<<c;
}
|
Приклад програми на Delphi
program zad1;
{$APPTYPE CONSOLE}
var a,b,c:integer;
begin
assign(input,'input.dat');
reset(input);
readln(a,b);
close(input);
c:=a+b;
assign(output,'output.ans');
rewrite(output);
writeln(c);
close(output);
end.
|
Приклад програми на С++
//#include "stdafx.h"
#include <cstdlib>
#include "iostream"
#include "fstream"
using namespace std;
int main()
{ifstream cin("input.dat");
ofstream cout("output.ans");
int a,b,c;
cin>>a>>b;
c=a+b;
cout<<c<<endl;
return 0;
}
|
|