Дан массив из 10 частей вывести их на экран и узнать

Дан массив из 10 частей вывести их на экран и узнать является ли n-элемент отрицательным числом. КуМир!

Задать свой вопрос
1 ответ
var a: array[1..999] of integer; var n: integer;
begin
    for var i := 1 to 10 do begin
        a[i] := random(-9, 9);
        write(a[i] + ' ');
    end;
    writeln;
    read(n);
        if a[n] lt; 0 then
             write(n + '-элемент является отрицательным числом')
        else
             write(n + '-элемент не является отрицательным числом');
end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт