Question

!!!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.

Answer 1

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

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 будет выполнен раньше, то есть будет произведена операция побитового И.