Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal процедура https://www.cyberforum.ru/ pascal/ thread53181.html
посмотрите прграммуб в чем ошибка: даны действительные числа s t получить f(t,-2s,1.17)+f(2.2,t,s-t); где f(a,b,c)=(2a-b-sin(c))/(5+|c|) Program; var s,t,p,g,y:real; procudure f(a,b,c:real;var k:real); begin k:=(a*2-b-sin(c))/(5+abs(c)); end; Begin
Pascal сумма чисел больше 20,меньше 100,кратных 3 и заканчивающихся на 2,4 или 8
сделать программу суммы чисел больше 20,меньше 100,кратных 3 и заканчивающихся на 2,4 или 8 (на паскале!)
Pascal Табулирование функции https://www.cyberforum.ru/ pascal/ thread53165.html
сделать программу вывода на паскале зачение функции y=Sin(x)-Cos(x) на отрезке (-5;5)
Pascal Найти сумму положительных элементов в одномерном массиве https://www.cyberforum.ru/ pascal/ thread53157.html
Найти сумму положительных элементов в одномерном массиве, если известна блок-схема алгоритма. В приведенной блок схеме введения массива реализовать с помощью процедуры, а нахождение суммы с помощью процедуры функции.
Указатели, матрица Pascal
Дана матрица А(n,m). Поменять местами первую и последнюю строку а каждый элемент этих строк увеличить в 2 раза! Задача должна быть решана с помощью указателей! ^ new dispose и т.д Помогите пожалуйста
Pascal массив 1. создание однородного массива из 13 элементов. сколько элементов больше числа А (А вводить с клавиатуры) 2. создать матрицу 5х4. Поменять местами столбцы содержащие наибольший элемент и наименьший. вывести новую матрицу. https://www.cyberforum.ru/ pascal/ thread53112.html
Pascal строки в заданном предложении подсчитать каких букв встречается больше "к" или "р" https://www.cyberforum.ru/ pascal/ thread53110.html Pascal Две одинаковых цифры, Сумма ряда.
Помогите решить две задачи! 1)Дано натуральное число n. Вычислить : 1/(1+2) - 1/(2+3) + ... + (-1)(n+1степень)/n+(n+1) сор, я не знал как пример по другому написать... 2)Найти все четырехзначные числа, в которых ровно две одинаковые цифры.
Pascal Числа-палиндромы. Составте программу, которая определяет, является ли введённое с клавиатуры целое трёхзначное число палиндромом, т.е. читается одинаково слева направо и справа налево????? https://www.cyberforum.ru/ pascal/ thread53084.html Pascal Трехзначные числа. https://www.cyberforum.ru/ pascal/ thread53081.html
сделать программу вывода на паскале все трёхзначные числа
Функции. Pascal
В общем у меня программа на нахождение значений указаной функции, мне нужно вставить туда function (u:real):real ну т.е с применением функций при нахождении значения указанной функции. Вот текст программы: Program z_2; Uses crt; Var x,y,z,u,c,k:real; {vvod peremennyh} begin clrscr; x:=2.3156; {prisvojenie znachenija x zadanogo v usloviji} y:=-1.3785;{prisvojenie znachenija y zadanogo v...
Pascal Матрицы, 2 задачи Помогите пожалуйста, завтра нужно сдать. 1.Создайте матрицу 5х5, значение каждого элемента которой равно сумме номера строки и столбца, на пересечении которых он находится, и вычислите сумму элементов каждой строки 2.Наименьший элемент каждой строки прямоугольной таблицы, начиная со второй, замените наибольшим элементом предшествующей строки. https://www.cyberforum.ru/ pascal/ thread53078.html
Эксперт С++
7175 / 3234 / 81
Регистрация: 17.06.2009
Сообщений: 14,164
29.09.2009, 21:47 0

Условный оператор, геометрия. - Pascal - Ответ 285522

29.09.2009, 21:47. Показов 963. Ответов 2
Метки (Все метки)

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

Решение

Посчитал периметр круга.
Посчитал периметр прямоугольника.
Определил что меньше.
Если круг - посчитал прощадь круга и вывел.
Если прямоугольник - посчитал прощадь прямоугольника и вывел.

Добавлено через 1 минуту
Если периметры равны с точностью EPSILON, то выводим надпись
Pascal
1
writeln( 'нифига себе ты попал !' );


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

Условный оператор и оператор множественного выбора
Много заданий написал, но я уверен, что решить их не составит вам труда (не то что мне), хоть...

Условный оператор. Оператор выбора
Помогите пожалуйста с задачей, то я в поскале чайник)! Определить , пересекает ли парабола y=ax +...

Условный оператор
Напишите пожалуйста програмный код к заданию:используя не более 2х сравнений определить номер...

Условный оператор
Заданы площади круга R и квадрата S. Определить, поместится ли квадрат в круге. Задачу решить...

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

Условный оператор
В зависимости от введенного признака вычислить общее сопротивле- ние электрической цепи. При k = 1...

Условный оператор
Всем hello!!! Нужно разработь программу с использованием условного оператора для нахождения...

Условный оператор
Помогите пожалуйста.. x=1, если A=B , C<D x=2, если А=В,C> или равно D x=3, если A<>B ...

Условный оператор
http://keep4u.ru/imgs/b/2010/03/26/4f/4fecd4f8bb330d81b0e7749fcc7b008f.png Добавлено через 15...

Условный оператор
http://keep4u.ru/imgs/b/2010/03/26/dc/dcb6766ec0b02007012b035f48dc2b95.png

условный оператор
помогите решить пожалуйста буду длагодарна!!! условный оператор : 7 вариант

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