Найдите значение выражения (27,098а-27,098b):1,7 при а=6,97 б=3,97

1.

n := 1;

s := 0;

while n <= 80 do

begin

s := s + 10;

n := n * 3

end;

write(s);

2.

n := 1;

s := 20;

while n <> 5 do

begin

n := n + 1;

s := s - 5;

end;

write(s);

3.

n := 1;

s := 1;

while n <= 80 do

begin

s := s * 2;

n := n + 20

end;

write(s);

4.

n := 0;

s := 0;

while n + s <= 50 do

begin

s := s + 5;

n := n + 10;

end;

write(s);

5.

n := 0;

s := 120;

while n < 5 do

begin

s := s div 2;

n := n + 1;

end;

write(s);

6.

n := 1;

s := 0;

while n < 5 do

begin

s := s + n;

n := n + 1;

end;

write(s);

7.

n := 1;

s := 0;

while n < 5 do

n := n + 1;

s := s + n;

write(s);

Ребят не знаю куда обратиться, думаю здесь помогут, пожалуйста прошу