Помогите прошу

Определить значение переменных s и i после выполнения действий

s : = 0; i: = 5;

S : = 0; i : = 5;

while i>=0 do

begin

s : = s+i;

i : = i-1;

end;

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.

Сколько раз будет выполнен этот цикл? i:=2; while i

Цикл с параметром и шагом - 1 объявляется с использованием конструкции a) for i:=i1 downto i2 do begin ... end; b) repeat begin ... end until (выражение_условие) ; c) for i:=i1 to i2 do begin ... end; d) if (выражение_условие) begin ...

Установите взаимнооднозначное соотношение: 1) x:=1; A) Тело цикла не выполнится ни разу while x

Помогите найти ошибку (Информатика, Паскаль). var s, k, a:integer; Begin s:=0; k:=0; Read (a) ; while a0 do Begin if a mod 8=0 then Begin s:=s+a; k:=k+1; end; Readln (a) ; end; var y:real; begin y: = s/k; Read (s) ;