сформировать массив с подмогою Random от -30 до 30.Размер 10 частей

сформировать массив с подмогою Random от -30 до 30.Размер 10 частей .Сколько в массиве отрицательных частей?

Задать свой вопрос
1 ответ
Begin
randomize;
for i:=1 to n do
a[i]:random (60)-30;
k:=0;
for i:=1 to n do
if a[i]lt;0 then k:=k+1;
writeln('k=',k);
end.

язык программирования - Pascal, k - количество отрицательных частей
Галя Аруфулова
begin / n:=10 / randomize; / for i:=1 to n do / a[i]:random (100); / k:=0; / for i:=1 to n do / if a[i] mod 2=0 then k:=k+1; / writeln ('k=',k); / end.
Эвелина Кельганова
k количество четных
Mozdykov Vovka
спасибо
Амина Поплутина
вроде (b-a)+a же
Milena Elizeva
только не сейчас, я почиваю:)
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт