Алгоритмическйи язык

[CkooTuHa]

Помогите, пожалуйста с задачкой, вопрос жизни и смерти :С
Разработать решение данной задачи на алгоритмическом языке:
-Дан массив чисел.Найти количество отрицательных элементов

[ZX Spectrum-128]

K:=0;
For i:=1 to n do
  If a[i]<0 then
    K:=k+1;

[CkooTuHa]

Сообщение от ZX Spectrum-128

K:=0;
For i:=1 to n do
  If a[i]<0 then
    K:=k+1;

Учебный алгоритмический язык :С

[ZX Spectrum-128]

Это кумир который?

[ZX Spectrum-128]

нач
цел i,к
вещ таб a[1:n]
нц для i от 1 до n
  если а[i]<0 то 
    k:=k+1
  все
кц
вывод к
кон

[CkooTuHa]

Сообщение от ZX Spectrum-128

нач
цел i,к
вещ таб a[1:n]
нц для i от 1 до n
  если а[i]<0 то 
    k:=k+1
  все
кц
вывод к
кон

вот! спасибо большое!

[ZX Spectrum-128]

вот! спасибо большое!

Там еще в начале надо писать
алг (чего тут не помню)
дано
надо
А может и не нужно. Не помню. Еще не помню как константу (n) описать.