Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Массивы_пжалуста^^ Здраствуйте , не могли бы вы мне написать код для этой задачки : Создать файл с именем MAS и расширением txt. Заполнить, вручную, созданный файл массивом вещественных чисел (размер массива 5x5). Дописать (в Pascal) в созданные файл вектор вещественных чисел состоящий из 5 чисел и вывести на экран результирующую матрицу 6x5 https://www.cyberforum.ru/ pascal/ thread191732.html Pascal Решить задания на Паскаль!!!
1)Описать процедуру suma(c,a,b),которая прибавляет рациональные числа a и b,присваивает их сумму рациональному числу z. Числитель взять как int Знаменатель как 2)Написать программу с использованием лог.функций,которая определяет наличие цифр среди символов в массиве С. Вот мои наброски,только она не хочет работать правильно,всё время выводит только ФЕЛС program log; var c:array of char; ...
Pascal Двумерные массивы.Ввести матрицу... https://www.cyberforum.ru/ pascal/ thread191709.html
Ввести матрицу АNxM , вывести ее. В каждой строке матрицы найти k – количество отрицательных элементов. Переставить в обратном порядке последние (M − k ) элементов матрицы.
Pascal программа-переделать https://www.cyberforum.ru/ pascal/ thread191699.html
Помогите переделать а то я незнаю как её доделать((, плиззз))вот такое зание((: Постановка задачи: Подготовить данные об абитуриентах,поступающих в техникум.Информацию о каждом абитуриенте оформить в виде записи,содержащей следующие поля: 1.Фамилия,Имя,Отчество 2.Год рождения 3.Год окончания школы 4.Оценки в атестате 5.Признак--нуждается ли в общежитии 6.Оценки вступительных экзаменов.
Входной файл Pascal
На вход программе подаются сведения о сдаче экзаменов учениками 11-х классов некоторой средней школы. В первой строке сообщается количество учеников N, которое не меньше 10, но не превосходит 100, каждая из следующих N строк имеет следующий формат: <Фамилия> <Имя> <оценки>, где <Фамилия> – строка, состоящая не более чем из 20 символов, <Имя> – строка, состоящая не более чем из 15 символов,...
Pascal Процедуры и функции https://www.cyberforum.ru/ pascal/ thread191665.html
Пользователь вводит три вещественных числа: a,b,c. Составить функцию для решения уравнения (x+a)/(x+b)=сx, которая получает введенные числа в качестве параметров. Найденные корни уравнения функция возвращает в качестве двух других параметров. Результат, который возвращает сама функция, должен позволять отслеживать следующие случаи (зависящие от значений введенных чисел): уравнение имеет только...
Pascal ввод строки из текстового файла, обработка и сохранениерезультата в текстовый фаил https://www.cyberforum.ru/ pascal/ thread191663.html
вот программа, в ней надо ввести строку, потом она обработается и выводит результат. program pr1; var s:array of string; s1,s2:string; i,j,n,a:integer; slovo,slovo1:string; begin cls;
Найти произведение цифр k значного числа Pascal
Помогите пожалуйста создать программу которая будет вычислять произведение цифр k значного числа
Pascal Деление числа на 6!! https://www.cyberforum.ru/ pascal/ thread191653.html
Уважаемые эксперты, помогите пожалуйста исправить ошибку.Ошибка заключается в следующем при делении числа 7,5,11,13 и д.р на 6 выходит результат, что данное число делится, а это не так. Помогите пожалуйста, завтра сдавать а у меня ошибка((. program na11; uses crt; var r4,r3,n,s,r,r1,r2,r6:longint; h:integer; st:string;
Pascal помогите. неполучается! Все слова в которых буква "a" более 2-ух раз удалить из текста. Выведите на экран. Если такого символа нет, то выведите соответствующее сообщение вот код! uses crt; var s,s1,s2:string; n,i,j,k,p:byte; begin clrscr; writeln('Введите последовательность слов, разделенных пробелами'); readln(s); https://www.cyberforum.ru/ pascal/ thread191650.html
Области в двумерном массиве Pascal
Добрый вечер. Имеется двумерный массив (размерность любая), заполненный 0 и 1. Найти количество областей из рядом стоящих 1. Области не могут соприкасаться друг с другом. Пример ниже. Заранее спасибо. :)
Pascal Определить значение логического выражения https://www.cyberforum.ru/ pascal/ thread191639.html
Определить значение логического выражения при A=1, B=2, C=3, D=4, F=5. (D+A<=F) and (B*C=2*D) and (F>=A+C)
25 / 9 / 4
Регистрация: 17.10.2010
Сообщений: 203
15.11.2010, 20:35 0

Вычислить значение функции - Pascal - Ответ 1113291

15.11.2010, 20:35. Показов 1152. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
uses crt;
var
  x,y:real;
begin
write('ââåäèòå x = ');readln(x);
  if x<=-3 then y:=x
   else if x>-3 then y:=(1/sqr(x))+1;
writeln('Îòâåò: ',y:5:4);
readkey
end.


Вернуться к обсуждению:
Вычислить значение функции Pascal
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.11.2010, 20:35
Готовые ответы и решения:

Вычислить значение заданной функции непосредственно и как сумму ряда с погрешностью 0,001. Значение аргумента выбрать самостоятельно
Значение аргумента выбрать самостоятельно.

Вычислить значение функции
Вычислить значение функции: Z = \sum_{i = 1}^{M}\sum_{j = 1}^{i} \frac{1}{2j + i}

Вычислить значение функции
Написать программу на функции. Задание под номером 2. Спасибо заранее)

Вычислить значение функции Y
Помогите написать программу на паскале для нахождения значения функции Y.

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

Вычислить значение функции
Помогите пожалуйста решить задачу. Вычислить значение функции та показать результат таблицей для X...

Вычислить значение функции
Паскаль &quot;разветвляющие алгоритмы&quot; Даны два целых числа A и B. Вычислить : 5, если...

Вычислить значение функции
Доброго времени суток уважаемые форумчане! Помогите пожалуйста с задачей: (условный оператор)...

Вычислить значение функции
пожалуйста помогите решить задачу. Срочно. Вычислить f(a,b,c)=(2a-b-sin(c))/5+|c|; c=10; a и b...

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