Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Ошибка в сортировке масива https://www.cyberforum.ru/ pascalabc/ thread958561.html Значения элементов массива упорядочены по убыванию. Определить, на какое место в массиве следует записать число 100, чтобы упорядоченность значений сохранилась. Помогите найти ошибку var a:array of integer; i,j,k,c,p,n,m,min,s: integer; q:boolean; begin c:=100; read(n); for i:= 1 to n do read(a); for i:= 1 to n do	Pascal ABC Найти минимальный элемент последовательности среди элементов расположенных на четных местах найти минимальный элемент последовательности среди элементов расположенных на четных местах и положительных
Pascal ABC Определить взаимное расположение прямоугольника и окружности Прямоугольник находится в начале координат нижним левым углом. Входные данные:высота и длина прямоуглотника, радиус и координаты окружности. https://www.cyberforum.ru/ pascalabc/ thread958162.html	Pascal ABC Вычислить для треугольника со сторонами a, b и c радиус R окружности, которая или вписана в него, или описана вокруг него. Вычислить для треугольника со сторонами a, b и c радиус R окружности, которая или вписана в него, или описана вокруг него. https://www.cyberforum.ru/ pascalabc/ thread957998.html
Pascal ABC Перевести код с Турбо на АВС (с модулем Graph) ребят можете перекодировать программу а то на моей системе TP не работает. Модуль Graph не работает program Potokk1; uses crt,graph; const n=2;m=50;dt=1;dx=1;s=1; var i,kk,k,j,DriverVar,ModeVar,ErrorCode:integer; p:array of real; uslovie:boolean; v:real;	Pascal ABC Принадлежит ли начало координат данному прямоугольнику https://www.cyberforum.ru/ pascalabc/ thread957889.html Действительные числа x1,y1,x2,y2,x3,y3,x4,y4 являются координатами вершин прямоугольника со сторонами параллельными осям координат. Принадлежит ли начало координат этому прямоугольнику? Помогите, ребята. Заранее спасибо. Задача на разветвленную программу, хотя думаю вы и так догадались.
Pascal ABC Цикл на несколько вхождений Есть тут проблема, вот само задание: заменить все слова child на children в строке. В общем у меня заменяет только при первом вхождении, последующие игнорит. Посмотрите, может подскажите в чем ошибка. Вот код: program pas_79; uses crt; var stroka, subs, subs_remove:string; n:integer; begin clrscr; writeln('Введите текст:'); readln(stroka); writeln('Искомое... https://www.cyberforum.ru/ pascalabc/ thread957828.html	Pascal ABC pi вычислить число pi
Pascal ABC Найти корень числа https://www.cyberforum.ru/ pascalabc/ thread957821.html составить программу нахождения числа корень из 2 в десятичном представлении.	Pascal ABC Составление программы Приветствую всех форумчан, прошу помощи в составлении программы: Даны натуральное число n и вещественные числа t, a0, a1, ..., an. Вычислить значение многочлена: a0xn+a1xn-1+...+an-1*x+an и его производной в точке t2+0.5 Знания пока не позволяют сделать это. Буду благодарен за любую помощь в написании этой программы. https://www.cyberforum.ru/ pascalabc/ thread957702.html
Составить пару примитивных программ Pascal ABC Ребят, нужна помощь. Помогите составить 2 программы. Нужны только 2 задания с каждой картинки. Спасибо большое! Ссылки на картинки с заданиями. первая,вторая	Pascal ABC Условие: Проверить, образуют ли введенные символы А, В, С целое трехзначное четное число https://www.cyberforum.ru/ pascalabc/ thread957431.html Написать программу, в результате выполнения которой булевская переменная t получает TRUE, если выполняется указанное условие, и FALSE в противном случае.(Операторы IF и Case не использовать). б) введенные символы А,В,С образуют целое трехзначное четное число; Var n1,n2,n3: byte; t:boolean; Begin readln(n1,n2,n3); t:=(n1100+n210+n3) mod 2=0; writeln(t); End.

joker195

0 / 0 / 0

Регистрация: 15.09.2013

Сообщений: 4

Program1.pas(12) : Нельзя преобразовать тип real к integer - Pascal ABC - Ответ 5079133

20.09.2013, 18:04. Показов 46014. Ответов 9

Метки (Все метки)

Author24 — интернет-сервис помощи студентам

Pascal

Program Logika; 
var x,y,z: real; 
 L,A,B,C:boolean; 
begin 
 cls; 
 // Вводим исходные данные: 
 writeLn('Введите x,y,z'); 
 readLn(x,y,z); 
 // вычисляем промежуточные предикаты: 
 A:= (sin(x)>cos(x)); 
 B:= (abs(y)>= 2*(sqrt(x))); 
 C:= (12 div z <= 6);
 // выводим полученные значения
writeLn('A=',A,' B=',B,' C=',C);
 // вычисляем и выводим результирующий предикат: 
 L:= ((C xor B) and (A or B)) xor B;
 writeLn('L=',L); 
end.

В чем проблема?

Вернуться к обсуждению:
Program1.pas(12) : Нельзя преобразовать тип real к integer Pascal ABC

Следующий ответ

Заказать работу у эксперта

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

20.09.2013, 18:04

Готовые ответы и решения:

Program1.pas(7) : Нельзя преобразовать тип KeyValuePair<real,integer> к real
program pomogite; var x, y: real; begin readln(x); if x=>-2 and 3>=x then y:=sqrt(x*x+4) ...

Запутался с программой,выдает ошибку Program1.pas(21,4): Нельзя преобразовать тип IEnumerable<integer> к integ
Доброго времени суток,суть моей проблемы такова.При запуске программы выдает ошибку...

Нельзя преобразовать тип function(a: integer;b: integer):integer к real
unit matr1; interface type matr2=array of real; matr3=array of real; procedure sum...

Нельзя преобразовать тип real к integer
Всем привет) В процессе написание программы у меня возникла следующая проблема: Строка 24: нельзя...

	20.09.2013, 18:04

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

20.09.2013, 18:04

Помогаю со студенческими работами здесь

Нельзя преобразовать тип real к integer
Выдаёт ошибку при завершении "Program1.pas(15,20): Нельзя преобразовать тип real к integer" в чём...

Нельзя преобразовать тип real к integer
uses graphabc; begin var x,y:real; var angl:integer; x:=0; y:=0; for angl:=0 to...

Нельзя преобразовать тип real к integer
Пишет ошибку : Нельзя преобразовать тип real к integer procedure Repeat1; Const Alpha = 0.1;...

Нельзя преобразовать тип real к integer
program l7; var F1,F2:text; R,K:real; i:byte; begin assign(F1,'E:\file1.txt');...

Новые блоги и статьи
Откуда у float лишние цифры в конце дробной части. Представление чисел с плавающей точкой bytestream 25.01.2025 При разработке программного обеспечения часто возникает необходимость работать с вещественными числами, которые содержат дробную часть. В современных компьютерных системах такие числа представляются. . .	Как использовать глобальную переменную в функции в Python bytestream 25.01.2025 В программировании на Python глобальные переменные представляют собой особый тип переменных, которые доступны для использования во всех частях программы, включая различные функции, классы и модули. . . .	Как в цикле обойти все элементы map в Java bytestream 25.01.2025 В разработке на Java одной из наиболее востребованных структур данных является интерфейс Map, который предоставляет эффективный способ хранения и управления парами "ключ-значение". Разработчики. . .	Для чего нужен UserManager.isUserAGoat() в Android и как это использовать bytestream 25.01.2025 В мире Android-разработки существует множество интересных и порой загадочных функций, о которых знают далеко не все разработчики. Одной из таких функций является метод UserManager. isUserAGoat(),. . .	Как обойти масси в JavaScript. Всё о циклах bytestream 25.01.2025 JavaScript представляет собой мощный язык программирования, широко используемый в веб-разработке, где массивы и циклы являются фундаментальными концепциями для эффективной работы с данными. Массив в. . .	Как сделать, чтобы существующая ветка отслеживала удалённую в Git. Связывание локальных и удалённых веток bytestream 25.01.2025 В разработке программного обеспечения системы контроля версий стали неотъемлемой частью процесса создания качественного программного продукта. Эти инструменты позволяют разработчикам эффективно. . .
Как проверить, что файл НЕ существует с помощью Bash bytestream 25.01.2025 В системном администрировании проверка существования файлов является фундаментальной операцией, особенно при написании скриптов на Bash. Правильная обработка ситуаций, когда файл отсутствует,. . .	Как проверить, что строка пустая, неопределена или null в JavaScript bytestream 25.01.2025 При разработке веб-приложений на JavaScript разработчики регулярно сталкиваются с необходимостью проверки строковых значений на различные состояния. Валидация данных является критически важным. . .	Как проверить существование ключа в объекте или массиве в JavaScript bytestream 25.01.2025 При разработке веб-приложений на JavaScript программисты постоянно сталкиваются с необходимостью работать с объектами и массивами. Эти структуры данных являются фундаментальными элементами языка и. . .	Как создать ArrayList из массива (array) в Java bytestream 25.01.2025 При разработке программного обеспечения на языке Java программисты часто сталкиваются с необходимостью эффективного управления наборами данных. Массивы и ArrayList являются двумя фундаментальными. . .	Как сгенерировать случайные целые числа (int) в указанном диапазоне в Java bytestream 25.01.2025 В программировании генерация случайных чисел является важнейшим инструментом для решения множества практических задач. От создания игровых механик до реализации алгоритмов машинного обучения, от. . .	Как сделать, чтобы grep выводил строки до и после найденной hw_wired 25.01.2025 Утилита grep стала незаменимым инструментом для поиска и фильтрации информации в Unix-подобных операционных системах. Эта командная утилита позволяет осуществлять поиск строк, соответствующих. . .

Наверх