Question

1. Определите значение переменной a после выполнения данного алгоритма:

a := 3

b := 7

b := 9+a*b

a := b/5*a

2. Запишите значение переменной s, полученное в результате работы следующей программы.

var n, s: integer;

begin

s := 0;

for n := 3 to 7 do

s := s + 2 * n;

write(s);

end.

3. Дан условный оператор:

If a 5 then b:=1

else b:=0

Answer 1

Ответ:

1)

Program a;

const

a:=3;

b:=7;

begin

b:=9+a*b;

a:=b/5*a;

writeln('вивидим значение а', а) ;

end.

2) она полностю готова ☝ у вопросе.

3)

Program

var

a: integer;

begin

readln(a) ;

if a=5 then

b:=1;

else

b:=0;

Writeln(b);

end.