Объясните ошибки в следующих записях на языке Паскаль, а также предложите, как можно исправить запись выражения №3? 1) tan(2* x +30 > 3.14)
2) (false / 2) /\ not(true)
3) true or x = 0 and trunc(20*y) mod 2 = 0
4) c and not (a or and b) (переменные a, b, c имеют тип boolean)
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrReal('Введите 4 числа:',4);
if Frac(a.Sum/(a[3]-a[2]))=0 then Writeln('Целый результат')
else Writeln('Нецелый результат')
end.
Примеры
Введите 4 числа: 7.2 1.8 25.5 5.5
Целый результат
Введите 4 числа: 36 18.6 12 5
Нецелый результат
Объяснения:
Первый (после begin) оператор объявляет массив из четырех вещественных элементов и заполняет его вводимыми с клавиатуры данными.
Второй делает остальное: вычисляет результат, проверяет, целочисленный ли он и выводит соответствующее сообщение на монитор.