Помогите с заданием 1. a:=10 b:=4 b:=200-a*b a:=b/20*a 2. car s, k: integer; begin...

Question

Помогите с заданием
1.
a:=10
b:=4
b:=200-a*b
a:=b/20*a
2.
car s, k: integer;
begin
s:=60;
for k:=1 to 8 do
s:=s-4;
write (s );
end.

Comments

Чем именно нужно помочь?

Answer 1

В первом задании будет ответ 80

Comments

2) 56,52,48,44,40,36,32,28