Var a: array[1..6] of integer;
i, k, d, v, n: integer;
begin
for i:=1 to 6 do
begin
write('Введите элемент массива под номером ', i, ' = ');
readln(a[i]);
end;
k:=0;
d:=0;
v:=0;
n:=6;
for i:=1 to n do
if a[i]=0 then
k:=k+1
else
if a[i]>0 then
d:=d+1
else
if a[i]<0 then
v:=v+1;
writeln('Количество нулевых = ', k);
writeln('Количество положительных = ', d);
writeln('Количество отрицательных = ', v);
end.
Внутренняя для работы компьютера , внешняя для пользователя компьютера
Имя переменной в Pascal может содержать символы латинского алфавита, цифры и знак подчёркивания, причем первым символом может стоять или буква или знак подчёркивания. Использовать цифры в качестве первого символа недопустимо. Также необходимо помнить о ключевых словах, так как совпадение имен переменных с ними запрещено.
Таким образом, правильными ответами являются:
a, d, f и i
y = (1+x) - sin(abs(x));
Если пишешь на С/С++ библиотека <cmath>
В - > Б - > А - > Г. Добавление логической операции И уменьшает количество запросов.