Информатика 10 класс1) Написать функцию ,которая выдаёт правду ,если число четное

Информатика 10 класс
1) Написать функцию ,которая выдаёт правду ,если число четное и если ложь - нечетное.
2) Написать функцию ,которая сменяет все четные числа в массиве 0 и выводит итог на экран.

Задать свой вопрос
1 ответ
1)function chet(a:longint):boolean;
begin chet:=(a mod 2)=0; end;
2) procedure z(var a:array of longint;length:longint);
var i:longint;
begin
for i:=1 to length do
begin
if not odd(a[i]) then a[i]:=0;
write(a[i],' ');
end;
end;
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт