СРОЧНО!! ПОМОГИТЕ С ИНФОЙ!! 24 БАЛЛА!! ЕСЛИ ПОЛУЧУ 2 ,ТО ИСКЛЮЧАТ((

Question

СРОЧНО!! ПОМОГИТЕ С ИНФОЙ!! 24 БАЛЛА!! ЕСЛИ ПОЛУЧУ 2 ,ТО ИСКЛЮЧАТ((

---

Answer 1

1) (Скр.1)

var i:integer;

begin

   for i:=1 to 9 do writeln('9 * ',i,' = ',(i * 9));

end.

2) (Скр.2)

var i,s:integer;

begin

   for i:= 5 to 11 do s := s + i * i;

   write('Response: ',s);

end.

---

---