Вопрос № 90787: 2.В текстовом файле t1 записана последовательность целых чисел, разделенных пробелами (пробелов может быть больше одного). Написать процедуру, записывающую в текстовый файл t2 все положительные числа из t1.
3.Построить таблицу значений функц...Вопрос № 90794: Помогите:
дана матрица А целых чисел 100 х 100 записана по строкам в файле. Найдите значение первого максимального элемента, а также номер строки и номер столбца, соответсвующие этому значению....
Вопрос № 90.787
2.В текстовом файле t1 записана последовательность целых чисел, разделенных пробелами (пробелов может быть больше одного). Написать процедуру, записывающую в текстовый файл t2 все положительные числа из t1.
3.Построить таблицу значений функции z= в числителе сh(x-y)-ch(x*x-y) в знаменателе ch*ch(x)+ch(x+y), где x меняется от 3 до 4 с шагом 0,1; y меняется от 2 до 3 с шагом 0,2. Вычисление гиперболического косинуса ch k= в числителе e в степени k , +e встепени -k в знаменателе 2, оформить в виде подпрограммы.
Приложение:
Отправлен: 10.06.2007, 07:00
Вопрос задал: ZET (статус: Посетитель)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 0)
Отвечает: Н.В.
Здравствуйте, ZET!
Ответ на первый вопрос: program p90787; uses crt; var t1,t2:text;
a : integer; begin
Assign(t1,'E:FPCfile1.txt'); {замените на путь к Вашему файлу}
Reset(t1);
Assign(t2,'E:FPCfile2.txt'); {замените на путь к Вашему файлу}
ReWrite(t2); while not EOF(t1) do begin
read(t1,a); if a > 0 then
Write(t2,a,' '); end;
Close(t1);
Close(t2); end.
Удачи!
Ответ отправил: Н.В. (статус: Студент)
Ответ отправлен: 10.06.2007, 09:18 Оценка за ответ: 5 Комментарий оценки: МОЛОДЕЦ!
Отвечает: Gh0stik
Здравствуйте, ZET!
Вот решение задачи номер 3. program xxx; function ch(t:real):real; begin
ch:=(exp(t)+exp(-t))/2; end; var x,y:real; begin
x:=3; repeat
y:=2-0.2; repeat
y:=y+0.2;
writeln(x:4:1,'|',y:4:1,'|',(ch(x-y)-ch(x*x-y))/(sqr(ch(x))+ch(x+y)):9:3); until y>3;
x:=x+0.1; until x>4; end.
Good Luck!!!
--------- Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессор) Украина, Славянск Организация: Славянский государственный педагогический университет (Кафедра алгебры) ICQ: 289363162 ---- Ответ отправлен: 10.06.2007, 15:37 Оценка за ответ: 5 Комментарий оценки: ОТЛИЧНО!
Вопрос № 90.794
Помогите:
дана матрица А целых чисел 100 х 100 записана по строкам в файле. Найдите значение первого максимального элемента, а также номер строки и номер столбца, соответсвующие этому значению.
