Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Массив Определить среднюю температуру июля Помогите разобраться с задачей, решите пожалуйста... кому это не сложно... Буду очень благодарен. Я в этом не чего не понимаю...За ранее очень благодарен 1) Задана таблица температур за 3 летних месяца. Определить среднюю температуру июля (приблизительно понимаю но вот каким образом писать это...не знаю) https://www.cyberforum.ru/ pascal/ thread104368.html Pascal Даны два натуральных числа
Составить программу на языке Pascal, используя процедуру или функцию. Даны два натуральных числа. Определить, является ли первое число перевертышем второго?
Pascal Составить программу, которая выводит на экран таблицу перевода 1, 2, 3...20 долларов США в рубли.Курс доллара вводится с клавиатуры. https://www.cyberforum.ru/ pascal/ thread104361.html
ПРОТОКОЛ Введите курс доллара: 20.57 1 д. = 20.67 2 д. = 41.34 3 д. = 62.01
Pascal Движение пузырька https://www.cyberforum.ru/ pascal/ thread104357.html
Нужно составить программу по следующему сценарию: в центре экрана находится пузырёк. При нажатии на одну из курсорных кнопок (клавиш-стрелок) пузырёк движется в указанном направлении и останавливается у края экрана.
Бесконечная сумма Pascal
Проверьте пожалуйста всё ли правильно в задачке: Необходимо составит программу расчета бесконечной суммы обратных степеней числового ряда(1+1/2^2+1/3^2......).Суммирование проводить пока очередной член ряда по модулю не станет меньше заданной погрешности(е=10^-4). Результат сравнить с точным значением St((Pi^2)/6), а погрешность сопоставить с величиной эпсилон. Program besconecs; const ...
Pascal Выход из вложенного цикла https://www.cyberforum.ru/ pascal/ thread104351.html
Не получается продолжить поиск со следующей строки после нахождения первого отрицательного элемента в двумерном массиве. Полагаю, нужно смотреть в сторону while. Рабочая часть: {Ввести числовой массив А размерностью 4х5. Сформировать одномерный массив В по следующему правилу: если в i-ой строке массива А найдётся хотя бы один неотрицательный элемент, то В=1, иначе В=0.} program array;
Pascal Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности Составьте рекурсивную подпрограмму вычисления n-ого члена последовательности по рекуррентной формуле: xi=(i+1)xi-2; где x1=1; x2=0.3; i =3,4,… https://www.cyberforum.ru/ pascal/ thread104348.html Умножение полиномов (многочленов) Pascal
Срочно нужна помощь! Коэффициенты многочленов заданы списком. Нужно создать функцию умножения двух полиномов. Не представляю как можно это сделать, нашел вот это: https://www.cyberforum.ru/cpp-beginners/thread40727.html?uri=/cpp-beginners/thread40727.html но не знаю C++.
Pascal Получить порядковый номер первого четного элемента вводимой последовательности program pro; var N : integer ; ci,i : integer ; c : integer ; A : array of integer; begin randomize; writeln ('Введите N'); readln (N); until N<=0 ; writeln ('Интегрируемый массив'); https://www.cyberforum.ru/ pascal/ thread104338.html Pascal Дан массив A(N) https://www.cyberforum.ru/ pascal/ thread104337.html
Дан массив A(N). Найти сумму значений элементов, которые меньше полусуммы наименьшего и наибольшего значений элементов данного массива. Помогите, пожалуйста!
Pascal как приостановить цикл в паскале?
как приостановить цикл в паскале????
Pascal Рекурсия прямая и косвенная https://www.cyberforum.ru/ pascal/ thread104327.html
22. Постройте последовательность чисел по рекуррентной формуле: аi =i* аi-1 - i, где а1 = 1, i=2,3,4,5, …
0 / 0 / 0
Регистрация: 16.03.2009
Сообщений: 25
14.03.2010, 14:27  [ТС] 0

Исправьте ошибку - Pascal - Ответ 598136

14.03.2010, 14:27. Показов 784. Ответов 3
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
10
11
Program Z;
Var z1, z2, x:real;
Begin
Writeln('BBeDuTE x');
Readln(x);
z1:=(x*x+2*x-3+(x+1)*sqrt(x*x)-9)/(x*x-2*x-3+(x-1)*sqrt(x*x-9));
z2:=sqrt((x+3)/(x-3));
Writeln('z1=',z1:4:2);
Writeln('z2=',z2:4:2);
Readln;
End.
Все равно ошибка 207 выскакивает.

Вернуться к обсуждению:
Исправьте ошибку Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.03.2010, 14:27
Готовые ответы и решения:

исправьте ошибку
исправьте ошибку - не может найти указанный путь. И вообще эта программа считается базой данных? ...

Исправьте ошибку
program notebook; USES CRT; type NOTE = record fam:string; im:string; telefon:string;...

исправьте ошибку
program dvoichnyi; uses crt; var i:integer; a:array of integer; b:array of string; s,d:string;...

Исправьте ошибку!
Всем привет , посмотрите что не так, 207 ошибку выдает. Program Zadanie; Var w,y,x,b,a:real;...

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

исправьте ошибку
Если в матрице А нет элементов модуль которых отличается от заданной величины Р менее, чем на...

Исправьте ошибку пожалуйста!
Unit Perevod; INTERFACE function per10_2(x:longint):string; function...

Исправьте ошибку,за ранее спасибо!
Дано действительное число х, натуральное число n. Вычислить: пример...

Побочная диагональ и нули. Исправьте ошибку.
Не могу понять почему не работает прога. Условие: должна читать из тескстового файла массив, лепить...

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