begin assign (T,'File.txt'); //Ассоциация переменной T с файлом File.txt rewrite (T); //Перезапись файла T и открытие его для записи for i := 1 to 6 do begin readln (s); writeln (T,s); end;
#include <iostream> using namespace std; int main() { cout<<–2013<<" "<<21<<" "<<56<<endl; cout<<–2.034<<" "<<1.15<<" "<<5.36<<endl; cout<<"– 2 0 1 5"<<endl; cout<<"Наступил 2015 год"<<endl; cout<<"Поздравляю Всех с Новым"<<endl<<"2 0 1 5"<<endl<<"годом !"<<endl; cout<<"Выполнила задание"<<endl<<"Радченко Мария Александровна"<<endl <<"слушатель группы ЗМС-14-4"<<endl; system("PAUSE"); return 0; }
Результат выполнения программы: -2013 21 56 -2.034 1.15 5.36 - 2 0 1 5 Наступил 2015 год Поздравляю Всех с Новым 2 0 1 5 годом ! Выполнила задание Радченко Мария Александровна слушатель группы ЗМС-14-4 Для продолжения нажмите любую клавишу . . .
var
s : string;
T : text;
i : integer;
begin
assign (T,'File.txt'); //Ассоциация переменной T с файлом File.txt
rewrite (T); //Перезапись файла T и открытие его для записи
for i := 1 to 6 do
begin
readln (s);
writeln (T,s);
end;
close(T); //Закрытие файла T
end.