а)Составьте программку ввода частей массива а[1..8]  с клавиатуры и вывода на

А)Составьте программку ввода элементов массива а[1..8] с клавиатуры и вывода на экран частей с отрицательными значениями.
б)составьте программку,которая наполняет массив b[1..8] случайными целыми числами в спектре от 1 до 10 и находит количество элементов с нечетными значениями.

Задать свой вопрос
1 ответ
А)
var a:array[1..8] of integer;
i:integer;
begin
for i:=1 to 8 do read(a[i]);
for i:=1 to 8 do if (a[i] lt;0) then writeln(a[i]);
end.

б)
var b:array[1..8] of integer;
i,c:integer;
begin
rand
omize;
for i:=1 to 8 do begin
b[i]:=random(10)+1;
if (b[i] mod 2=1) then inc(c);
end;
writeln(c);
end.

Не запамятовай отмечать наилучший ответ!
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт