Запишите на языке Паскаль следующие условия. Только условия! а) z ϵ [-7; 10]; б) x четное число; в) x ≠ 78; г) x нечетное число.
Найдите и исправьте ошибки в записи программы. Зачеркните ошибку, напишите правильный вариант и объясните почему. var a: integer; begin; a := 4.13; if a+1 > 7 then write ('a = ', a*3); else write ('a = ', a*6); end
1) Переменная а объявлена как integer, т.е предназначена для хранения целочисленных значений. Но при этом в программе ей присваивают значение 4.13, которое не является целым числом.
Правильно будет объявить переменную а типа real;
2) После ключевого слова begin никогда не ставится точка с запятой;
3) Перед else не ставится точка с запятой;
4) После заключительного end требуется ставить точку.
a) (z >= -7) and (z <= 10);
б) (x mod 2 = 0);
в) (x <> 78);
г) (x mod 2 <> 0);
Ошибки в программе:
1) Переменная а объявлена как integer, т.е предназначена для хранения целочисленных значений. Но при этом в программе ей присваивают значение 4.13, которое не является целым числом.
Правильно будет объявить переменную а типа real;
2) После ключевого слова begin никогда не ставится точка с запятой;
3) Перед else не ставится точка с запятой;
4) После заключительного end требуется ставить точку.
Правильный вариант:
var
a:real;
begin
a:=4.13;
if (a+1 > 7) then write('a = ', a*3) else
write('a = ', a*6);
end.