Question

Запишите на языке Паскаль следующие условия. Только условия!
а) 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

Answer 1

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.