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
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.