Помогииите с задачей по информатике

Question

Помогииите с задачей по информатике

---

Answer 1

const

y = 10;

var

a : array [1..y] of real;

avg : real;

s : integer;

begin

for var i:=1 to y do

read(a[i]);

for var i:=1 to y do

if a[i]<0 then begin</p>

avg:= avg+a[i];

s:= s + 1;

end;

avg:= avg/s;

write(avg);

end.

Comments

а var же можно использовать только один раз?

---

Если тебя задело то что я в цикле написал for var i:=1... то это я типа в программе для цикла создал переменную i, хоть мог также описать её заранее в блоке var (что сверху).Но я сделал это специально для цикла, это типа профессионально)0

---

Все,вопросов нет, спасибо тебе большое)))

---

Я решил проверить программу и вышло что я накосячил, я исправил. Надеюсь ты ещё не начал переписывать))

---

нет, я еще не началА)

---

"это типа профессионально" - в отношении Поцкала это звучит смешно.