Напишите программу, которая создает текстовый файл и вносит в него Вашу любимую цитату (строку текста) десять раз.
Ответы
Ответ дал:
0
//PascalABC.NET 3.1
begin
WriteAllText('название файла.txt', ('любимая цитата' + NewLine) * 10);
end.
//
или так на обычном паскале
var i: integer;
begin
assign(output, 'название файла.txt');
rewrite(output);
for i := 1 to 10 do writeln('любимая цитата');
end.
begin
WriteAllText('название файла.txt', ('любимая цитата' + NewLine) * 10);
end.
//
или так на обычном паскале
var i: integer;
begin
assign(output, 'название файла.txt');
rewrite(output);
for i := 1 to 10 do writeln('любимая цитата');
end.
Ответ дал:
0
Спасибо!
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
9 лет назад