Ошибка Incompatible types: got "Boolean" expected "Longint" - Free Pascal

Узнай цену своей работы

Формулировка задачи:

Доброго времени суток. Помогите, пожалуйста, избавиться от данной ошибки. Я пытаюсь решить задачу, условие которой следующее: "Для нормального разведения золотых рыбок необходимо, чтобы на каждую рыбку в аквариуме приходилось не менее 3-х литров воды. По известным объему аквариума и количеству рыбок, в нем содержащихся, определить, является ли аквариум "перенаселенным" или нет, и указать количество рыбок, которых в случае перенаселенности необходимо поместить в другой аквариум." Я хотел написать код с использование команды else, но программа считала, что на его месте должна быть точка с запятой.
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.
Программе не нравится строка: "if v mod 3 <> 0 and n*3>v then"

Решение задачи: «Ошибка Incompatible types: got "Boolean" expected "Longint"»

textual
Листинг программы
  else if n*3>v then  x:=y div 3+1;

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 4.417 из 5
Похожие ответы