Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Перенос значений переменных одной процедуры в другую https://www.cyberforum.ru/ pascalabc/ thread2397251.html
Условия задачи предельно просты: есть некий массив а, в котором n элементов и над которым проводится m операций. При вводе числа '1' p-тый элемент массива заменяется числом v, при вводе числа '2' p-тый элемент массива выводится в файл. Проблема в том, что код основной программы задан в условии и менять его запрещено.Редактировать разрешается только три подпрограммы: upd - замена элемента...
Подключение граф. режима Pascal ABC
Помогите, 8 класс, 3 упражнение , кто сможет помочь напишите ВК Удалено модератором.
Pascal ABC Описать функцию IsPowerN(K, N) логического типа Тема функции. Помогите решить задачу, с помощью функции и пожалуйста поясните строки кода, буду очень благодарен. Условие задачи: Описать функцию IsPowerN(K, N) логического типа, возвращающую TRUE, если целый параметр K (> 0 ) является степенью числа N (> 1), и false в противном случае. Дано число N (> 1) и набор из 10 целых положительных чисел. С помощью функции IsPowerN найти количество... https://www.cyberforum.ru/ pascalabc/ thread2397130.html Pascal ABC Построить график в паскале y=x^2-4x-4 https://www.cyberforum.ru/ pascalabc/ thread2397123.html
Пожалуйста, помогите, очень срочно! диапазон от 0 до 600
Pascal ABC Нужно исправить ошибку в программе
Нужно исправить ошибку в программе.СРОЧНО НАДО!ПЛЗ Нужно что бы программа выводила на экран "другие символы" , если ниже сказанные условия не будут работать var s:string; procedure act1(s:string); var i:integer; j,g,k:char; begin for i:=length(s) downto 1 do begin for j:='a' to 'z' do if s=j then writeln('англ символы:=',s) ;
Pascal ABC Оптимизация кода https://www.cyberforum.ru/ pascalabc/ thread2397085.html
program e_1; function NOK(n1,n2:LONGINT):LONGINT; //Функция нахождения НОК var m,nk:LONGINT; begin if n1>n2 then m:=n1 else m:=n2; nk:=m-1; repeat inc(nk); until ((nk mod n1)=0) and ((nk mod n2)=0); NOK:=nk;
Pascal ABC Последовательный поиск в массиве https://www.cyberforum.ru/ pascalabc/ thread2396965.html
В массиве случайно заданных целых чисел найти номер первого элемента из тех, значение которых оканчивается на 1. Если таких нет, то программа должна вывести "нет".
Для уравнения, методом половинного деления, вычислить значение корня с точностью e=0,0001 Pascal ABC
Для уравнения, методом половинного деления вычислить значение корня с точностью e=0,0001 cosx-4x=0
Pascal ABC Меню выбора через окна window Добрый день, попросили написать код, при выполнении которого бы пользователь мог бы выбрать откуда брать исходные данные: из файла или же ввод вручную. Так вот все бы ничего, но надо сделать так, чтобы при выборе "из файла" открывалось бы отдельное окно, где уже при помощи мыши можно было бы выбрать файл, где эти самые данные лежат. Мне нужна помощь в создании этого самого окна. program... https://www.cyberforum.ru/ pascalabc/ thread2396860.html Pascal ABC Частное от деления длинного числа на короткое Напишите программу, вычисляющую частное от деления двух целых неотрицательных чисел. Входные данные Дано одно число (длина которого не превышает 250 знаков) и число от 1 до 9999. Каждое число вводится на отдельной строке. Выходные данные Выведите частное от деления первого числа на второе. https://www.cyberforum.ru/ pascalabc/ thread2396826.html
Pascal ABC Обработка растровых изображений. Фильтры. (PascalABC)
Сделал программу которая должна накладывать фильтр на изображение по образцу (), с 4 страницы начиная. Код выполняется, а желаемого результата нет. С изображением ничего не происходит. Можно узнать в чем причина и где есть ошибка? uses ABCObjects,GraphABC; const filterSize = 5; half = 2; type filter = array of real; procedure filterApply (s,t: Picture; filterMatrix: filter);
Pascal ABC Подсчитать Y = n1 - n2 + n3 - n4 + n5 – n6 + n7 - n8 + n9 -n10... https://www.cyberforum.ru/ pascalabc/ thread2396703.html
Ввести N. Подсчитать Y = n1 - n2 + n3 - n4 + n5 – n6 + n7 - n8 + n9 -n10
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
01.02.2019, 17:18 0

Перевести пример в pascal abc - Pascal ABC - Ответ 13289759

01.02.2019, 17:18. Показов 4640. Ответов 2
Метки (Все метки)

Ответ

Pascal
1
f:=(x*y*z-3.3*abs(x+sqrt(y)))/(power(10,7)+power(z,2));


Вернуться к обсуждению:
Перевести пример в pascal abc Pascal ABC
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.02.2019, 17:18
Готовые ответы и решения:

Перевести код Pascal ABC NET в Pascal ABC
Помогите, плиз Сделал на Pascal ABC NET, но нужно его открыть в обычном Pascal ABC. Не компилит...

Перевести в код Pascal ABC из кода Pascal Delphi
procedure TForm1.Button1Click(Sender: TObject); const n=8; var x:array of real; y,z:array of...

Перевести в код Pascal ABC из кода Pascal Delphi
Помогите перевести в код ABC а то с Delphi вообще не знаком. Задание было такое: Записать в файл...

Нужно перевести код из Turbo Pascal в Pascal ABC
Program n5; { Задача. Описать функцию less(f) от непустого файла f ...

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

Написать пример на Pascal ABC
\frac{67.89e{}^{-(9.4|x|{}^{0.001}+9.87|y|{}^{0.67})}}{x^2+y^2+1} Помогите пожалуйста. Заранее...

Написать пример на Pascal abc
Прошу помочь. Заранее спасибо

Перевести из Turbo Pascal в Pascal ABC
Добрый вечер. Необходимо перевести этот код из Turbo Pascal в Pascal ABC. Заранее спасибо. uses...

Перевести с C++ на Pascal ABC
Ребята срочно нужно перевести на ABC. Помогайте) int i, j, sum=0; for (i=2013; i<10000; i++) {...

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