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.

boifrend2000

0 / 0 / 0

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

Сообщений: 4

07.02.2018, 16:52

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

07.02.2018, 16:52. Показов 45885. Ответов 9

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

Ответ

Pascal

program p1;
type punct=record
       x,y: integer;
       end;
     tablou=array[1..20] of punct;
 var a: tablou;
 function CALCUL (a:tablou; i,s,n:integer):tablou;
 var x,y: tablou;
 begin
 write('dati cantitatea de numere:');
 readln(n);
 s:=0;
 for i:=1 to n do
 if (x[i]>=0) and (y[i]>=0) then s:=s+1;
 end;
 begin
 write(calcul);
 end.

Program1.pas(14) : Нельзя преобразовать тип punct к integer
в чем проблема?

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

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

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

Programming

Эксперт

94731 / 64177 / 26122

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

Сообщений: 116,782

07.02.2018, 16:52

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

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: нельзя...

	07.02.2018, 16:52

IT_Exp

Эксперт

87844 / 49110 / 22898

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

Сообщений: 92,604

07.02.2018, 16:52

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

Нельзя преобразовать тип 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');...

Наверх