Ошибка Incompatible types: got "Boolean" expected "Longint" - Free Pascal
Формулировка задачи:
Доброго времени суток. Помогите, пожалуйста, избавиться от данной ошибки. Я пытаюсь решить задачу, условие которой следующее: "Для нормального разведения золотых рыбок необходимо, чтобы на каждую рыбку в аквариуме приходилось не менее 3-х литров воды. По известным объему аквариума и количеству рыбок, в нем содержащихся, определить, является ли аквариум "перенаселенным" или нет, и указать количество рыбок, которых в случае перенаселенности необходимо поместить в другой аквариум."
Я хотел написать код с использование команды else, но программа считала, что на его месте должна быть точка с запятой.
Программе не нравится строка: "if v mod 3 <> 0 and n*3>v then"
var n, v, x, y:integer; begin writeln('Рыбки, объём аквариума'); readln(n,v); if n*3<=v then writeln('Рыбки в комфорте'); if n*3>v then y:=n*3-v; if v mod 3 = 0 then x:=y div 3; if v mod 3 <> 0 and n*3>v then x:=y div 3+1; writeln(x,'рыбок нуждаются в переселении'); readln; end.
Решение задачи: «Ошибка Incompatible types: got "Boolean" expected "Longint"»
textual
Листинг программы
else if n*3>v then x:=y div 3+1;
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д