Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Распечатать таблицу значений функции https://www.cyberforum.ru/ pascal/ thread57485.html
распечатать таблицу значений z при изменении переменных величн "а" и "х" в данных промежутках с данными шагами помогите пожалуйста кто нибудь:cry:
Четные цифры числа Pascal
А может кто нить знает как решить такую : найти количество четных цифр целого положительного числа.
Pascal вычислить значение функции U Вычислить значение функции U Найти max значение U и при каких x,y,x оно достигается http://img34.imageshack.us/img34/2435/97711558.png или http://yfrog.com/0y97711558p - задания помогите... https://www.cyberforum.ru/ pascal/ thread57480.html Pascal Вещественный массив https://www.cyberforum.ru/ pascal/ thread57477.html
Дан вещественный массив из 5 строк и 4 столбцов. Строку содержащую максимальный элемент поменять с первой. Очень нужна ваша помощь.
Времена года Pascal
Написать алгоритм, который по введённому номеру времени (1-зима, 2-весна, 3-лето, 4-осень) выводит соответствующие этому времени года месяцы.
Pascal Перевод из римской в арабскую с\с https://www.cyberforum.ru/ pascal/ thread57459.html
Надо взять из файла римские числа и записать в другой фаил арабские Помогите плз
Pascal Матрица без массива Даны четыре целых числа. Определить, можно ли из них составить такую квадратную матрицу, чтобы суммы элементов строк были равными и суммы элементов столбцов были равными и вывести эту матрицу.... https://www.cyberforum.ru/ pascal/ thread57456.html Уничтожить текст от третьей гласной до конца файла Pascal
Сформировать файл. Ввести в него последовательность символов. Уничтожить затем текст от третьей гласной до конца файла. Помогите пожалуйста :sorry:
Pascal последовательность Помогите пожалуйста! Задание звучит следующим образом: дана непустая последовательность натуральных чисел(все числа различны), за которой следует 0. Определить порядковый номер наименьшего из них. https://www.cyberforum.ru/ pascal/ thread57452.html Pascal получить и упорядочить массив даны 2 массива заполненные числами, нужно получить из них один упорядоченный по возрастанию, сложность в том что нужно сделать это в одном алгоритме (найти 1е наибольшее и сразу записать на 1е место... https://www.cyberforum.ru/ pascal/ thread57450.html
Pascal Массив
Задание. Найти наибольшее и наименьшее значения, их индексы и среднее арифметическое элементов, расположенныч между ними в массиве D(n). n<=25. Вывести массив, среднее арифметическое, нименьшее и...
Pascal Функции в Паскале:) https://www.cyberforum.ru/ pascal/ thread57435.html
В Матрице найти количество строк, все элементы которых расположены по возрастанию( функция проверяет все ли элементы в строке расположены по возрастанию).
Почетный модератор
64276 / 47575 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
20.10.2009, 07:05 0

работа с файлами - Pascal - Ответ 313120

20.10.2009, 07:05. Показов 746. Ответов 3
Метки (Все метки)

Ответ

Программа написана для работы с файлами, заполненными латиницей.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
uses crt;
function LowCase(c:char):char;
begin
if c in ['A'..'Z'] then c:=chr(ord(c)+32);
LowCase:=c;
end;
var f,g:text;
    namef,nameg:string;
    s:char;
begin
clrscr;
write('Введите имя файла для изменений:  ');
readln(namef);
namef:=namef+'.txt';
assign(f,namef);
reset(f);
write('Введите имя файла для записи:  ');
readln(nameg);
nameg:=nameg+'.txt';
assign(g,nameg);
rewrite(g);
while not eof(f) do
 begin
  read(f,s);
  s:=LowCase(s);
  write(g,s);
 end;
close(f);
close(g);
write('Файл переписан!');
readln
end.


Вернуться к обсуждению:
работа с файлами Pascal
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.10.2009, 07:05
Готовые ответы и решения:

Работа с файлами
Помогите решить пожалуйста Дан символьный файл f. Группы символов, разделенных пробелами и не...

Работа с файлами
Файл содержит сведения о школьниках: фамилия, имя, рост и вес. Выведите список школьников, рост...

работа с файлами
нужно создать что=то (файл наверное) &quot;яхты&quot;. Характеристики такие: название, страна, водоизмещение,...

Работа с файлами
Дан файл f, компоненты которого являются целыми числами. Используя вспомогательный файл h,...

3
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
20.10.2009, 07:05
Помогаю со студенческими работами здесь

Работа с файлами
как записать в файл такую строку: nsd asd vsd ads и как потом прочитать из файла эту же строку

Работа с файлами
Дан файл, в котором записаны цифры, например: 24_25_78 Подсчитать эти цифры и заново записать в...

Работа с файлами
Создать файл и записать в него информацию Program Zad; Uses Crt; Type m=array of integer;...

Работа с файлами
1.Построить файл данных, компонентами которого являются вещественные числа. Найти сумму квадратов...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru