Другие языки программирования и технологии

Помогите решить проблему с паскалем, запутался...

var a,b,c,d,e:longint;
begin
writeln ('vvedite 3 chisla');
readln (a,b,c);
if (a>c) then d:=a/3;
writeln ('treti pervogo chisla ravna ',d);
if (b>c) then e:=b-c;
writeln ('raznosti 3 i 2 chisel ravna ',e);
readln;
end.

В чем может быть ошибка
он мне пишет: Type mismatch
точно
или или

if (a>c) then d:=Round(a/3); (* округлить до больше 5 десятых 8)

if (a>c) then d:=a div 3;

или объявить
var
....
d :real;
Олег Печенкин
Олег Печенкин
8 290
Лучший ответ
Игорь Харитонов Странно, программа запускается, но результаты всегда будут по нулям
Игорь Харитонов Нет, спасибо, все отлично =)
у тебя числа (тип) целые, а при делении может получаться не целое число
Олег Карнет
Олег Карнет
91 347
Skorpion 75 Не только может. Тип результата всегда будет нецелым.
Игорь Харитонов И какой же тип переменных мне поставить? Если ставлю integer такая же ошибка, а если real, то косяк полный
if (a>c) then d:=a/3;
Пытаешься присвоить целому d число с плавающей точкой d/3. Невозможно.
Сергей Никишев
Сергей Никишев
32 266
"Type mismatch" - это означает "Несоотвествие типов"
Объяви переменные так
var
a,b,c,e:longint; {это целочисленные переменные}
d:real; {это действительное число}

Результат действия деления всегда действительное число.
Dmitriy Trofimov
Dmitriy Trofimov
29 246
скаль для обоснования внутреннего отношения к религии предложил воспользоваться теорией игр, основанной на теории вероятностей. Он рассуждал:

Бог есть или нет. На которую сторону мы склонимся? Разум тут ничего решить не может. Нас разделяет бесконечный хаос. На краю этой бесконечности разыгрывается игра, исход которой неизвестен. На что вы будете ставить?

На что делать жизненную ставку — на религию или на атеизм? Для поиска ответа Паскаль предположил, что шансы существования или отсутствия бога примерно равны или, по крайней мере, конечны. Тогда возможны два варианта:
Жить без веры крайне опасно, так как возможный «проигрыш» в случае существования бога бесконечно велик — вечные муки. Если же его не существует, то цена «выигрыша» невелика — безверие нам ничего не даёт и от нас ничего не требует. Реальным выигрышем атеистического выбора будет уменьшение расходов на размер затрат на религиозные обряды.
Жить по канонам веры неопасно, хотя и чуть более затруднительно из-за постов, всяческих ограничений, обрядов и связанных с этим затрат средств и времени. Цена «проигрыша» в случае отсутствия бога невелика — затраты на обряды. Зато возможный «выигрыш» в случае существования бога бесконечно велик — спасение души, вечная жизнь.

В соответствии с теорией игр, при принятии решений в пользу одного из вариантов действий (ставок, событий) , которые происходят с разной вероятностью, для сравнения и количественной оценки нужно возможный приз (выигрыш, премию, результат) умножить на вероятность этого события. Какова же оценка рассматриваемых вариантов?
При умножении пусть даже большой вероятности, что бога нет, на небольшую ценность приза получается величина возможно и большая, но всегда конечная.
При умножении любой конечной, даже очень маленькой, вероятности, что бог окажет человеку милость за его добродетельное поведение на бесконечно большую ценность приза получается бесконечно большая величина.

Паскаль делает вывод о том, что второй вариант предпочтительнее, что глупо хвататься за конечные величины, если можно приобрести бесконечные:

Чем вы рискуете, сделав такой выбор? Вы станете верным, честным, смиренным, благодарным, творящим добро человеком, способным к искренней, истинной дружбе. Да, разумеется, для вас будут заказаны низменные наслаждения — слава, сладострастие, — но разве вы ничего не получите взамен? Говорю вам, вы много выиграете даже в этой жизни, и с каждым шагом по избранному пути все несомненнее будет для вас выигрыш и все ничтожнее то, против чего вы поставили на несомненное и бесконечное, ничем при этом не пожертвовав.
Санжар Осмонов
Санжар Осмонов
13 009
Сергей Никишев Если Вы так ответить на экзамене по программированию, Вас отвезут в психушку...
Николай Нарышкин блять шо за бред... Ты попутал тему... Или перекурил, но тогда нафиг цитаты вставлять...
а где курсор находится?
попробуй Лонгинт на Real поменять и все пучком будет