Turbo Pascal

Ответ: Turbo Pascal

ищу ПРИМЕРЫ роботы в графическом режиме турбо паскаль
 

Cris

Member
Ответ: Turbo Pascal

от возникла проблема:
начал учить графику, в школу все норм но када пытаюсь дома выскакует ошибка 16-разрядной системы.
вот код:
program adf;
uses graph;
var gd,gm:integer;
begin
gd:=detect;
initgraph(gd,gm,'');--- на этой строчке выьивает када запускаеш.
closegraph;
end.
все модули есть, все есть, все компилится но не запускается.
пробовал 2 компилятора турбо паскаль, и всеравно
 

Пух

كنت بلهاء
Модератор
Ответ: Turbo Pascal

у келбаса читерский компилятор. Дома все работает, у него-нет. И ничего не докажешь :)
 

Cris

Member
Ответ: Turbo Pascal

у меня наоборот, у келбаса пашет, у меня ни..я
 

dreamer

Member
Ответ: Turbo Pascal

от возникла проблема:
начал учить графику, в школу все норм но када пытаюсь дома выскакует ошибка 16-разрядной системы.
По-моему, нужно скопировать драйвер оттуда, где работает.
Имеет расширение BGI, скорее всего EGAVGA.BGI. Поищи там.
 

Cris

Member
Ответ: Turbo Pascal

копировал непомагает, копировал у моего друга у него моник такойже, тока видио карта друга.
можеш этот драйвер уже неработает с новыми видиокартами?
 

PLaTiNuM

ГоЛоВоРеЗ
Ответ: Turbo Pascal

ребята помогите сделать задачи.

№1
По трём введенным целочмсленным значениям A,B,C, являющимся сторонами треугольника определить,существует ли такой треугольник, является ли он правильным, равнобедренным или расзносторонним и вывести на экран соответсвующее сообщение.

№2
По трём введенным вещественным значениям a,b,c,
2
являющимся коэффициентами квадратного уравнения (ax + bx+c=0),провести анализ уровнения т если можно найти решение.

№3
При вводе целочисленных значений от 1-5, выводить на экран различные рекламные сообщения.

№4
2
(x-1) , если x<=1
Z = 2*x , если 1<x<=2
под корнем x-2 , если x>2

Последнее это всё система . Двойка вверху то квадрат :) Заранее благодарен помогите пожалуйста.И если кто-то может хотя бы одну показательную блоксхему нарисуйте в поинте!!!
 
Зверху