!!!50 БАЛЛОВ!!! Пишет: "Нельзя преобразовать тип real к integer". В чём может быть ошибка?
Объясните чайнику, пожалуйста!
Программа-PascalABC

var a, b, c: real;
begin
read (a);
read (b);
if a=16 and b=10 then c:=2;
write ('c=', c)
end.


em1tao: Напиши c:=2.0, мб поможет, или var c: integer на отдельную линию

Ответы

Ответ дал: Леганда555
2

Вот рабочий вариант:

var a, b, c: real;

begin

read (a);

read (b);

if (a=16.0) and (b=10.0) then c:=2.0;

write ('c=', c)

end.

1. Преобразовал все константы (16, 10 и 2) к вещественному типу, приписав ".0"

2. Нужно поставить скобки, так как у операции and приоритет выше, чем у операции сравнения. Поэтому and будет выполнен раньше, то есть будет произведена операция побитового И.


Леганда555: Как лучший ответ отметишь? :3
666Ilya: Огромное спасибо, помог!
Похожие вопросы