Найти и исправить ошибки в записи оператора ветвления if x>=y then begin x:=0; y:=0;

else end; write (z)

1. определить значение переменной А после выполнения оператора X:=5; if X>-3 then A:=X mod 2 else A:=abs (X) ; 2. определить значение переменной А после выполнения оператора X:=-26; Y:=6; if X div Y=4 then A:=X mod Y else A:=X*Y; 3.

Найдите ошибки в следующих операторах и запишите исправленные операторы. а) begin if x ²

Нужна помощь с кодом Pascal. If k11 = k12 then Begin If k12 = k13 then Begin If k12 = 'х ' then goto win1 Else goto win2; End; End; Else goto showp1; Выдает ошибку на последнем Else Program1. pas (132) : Встречено 'Else', а ожидался оператор

Где ошибка? Sub сер Dim x, y, z, f, max, min As Single x = Val (InputBox (2)) y = (InputBox (6)) z = (InputBox (10)) If x / 2 > y / 3 > z / 4 Then If x / 2 > y / 3 Then max = x / 2 Else max = y / 3 End If End If Else If y / 3 > z / 4 Then max =

3) Найти и исправить ошибки в записи оператора ветвления: if x>=y then begin x:=0; y:=0; else end; write (z) ;