Задать два массива целых чисел А(5) и В(7). Проверить или сумма элементов каждого массива является парным числом....

@Eragon · Регистрация: 19.12.2010

Студворк — интернет-сервис помощи студентам

Помогите пожалуйста.... очень нужно.

Задать два массива целых чисел А(5) и В(7). Проверить или сумма элементов каждого массива является парным числом. Для проверки воспользоваться логической функцией. Вывести на экран массивы и результаты.

@Unnamed2011 · 24.06.2011, 17:19

Поясните 1. Что такое парное число. 2. Проверить или сумма.... Непонятна фраза.

@Sarmat · 24.06.2011, 19:48

числа генерируются случайно функцией random

uses crt;
var
a:array [1..5] of integer;
b:array [1..7] of integer;
i,j,s1,s2:integer;
a1,b1:boolean;
begin
randomize;
a1:=false;
b1:=false;
s1:=0;
s2:=0;
for i:=1 to 5 do
begin
a[i]:=random(10);
s1:=s1+a[i];
end;
for j:=1 to 7 do
begin
b[j]:=random(10);
s2:=s2+b[j];
end;
if (s1 mod 2)=0 then a1:=true;
if (s2 mod 2)=0 then b1:=true;
write ('Cума элементов массива: ');
for i:=1 to 5 do
write (a[i]:2,' ');
if a1=true then writeln ('является парным числом') else writeln ('не является парным числом');
writeln;
write ('Cума элементов массива: ');
for j:=1 to 7 do
write (b[j]:2,' ');
if b1=true then writeln ('является парным числом') else writeln ('не является парным числом');
end.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .

@Eragon 1 / 1 / 0 Регистрация: 19.12.2010 Сообщений: 27

	Задать два массива целых чисел А(5) и В(7). Проверить или сумма элементов каждого массива является парным числом.... 24.06.2011, 13:14. Показов 2108. Ответов 2 Метки нет (Все метки) Помогите пожалуйста.... очень нужно. Задать два массива целых чисел А(5) и В(7). Проверить или сумма элементов каждого массива является парным числом. Для проверки воспользоваться логической функцией. Вывести на экран массивы и результаты. 0

@Unnamed2011 7 / 7 / 2 Регистрация: 24.06.2011 Сообщений: 54
	24.06.2011, 17:19
	Поясните 1. Что такое парное число. 2. Проверить или сумма.... Непонятна фраза. 0

@Sarmat 3 / 3 / 2 Регистрация: 13.11.2010 Сообщений: 57
	24.06.2011, 19:48
	числа генерируются случайно функцией random uses crt; var a:array [1..5] of integer; b:array [1..7] of integer; i,j,s1,s2:integer; a1,b1:boolean; begin randomize; a1:=false; b1:=false; s1:=0; s2:=0; for i:=1 to 5 do begin a[i]:=random(10); s1:=s1+a[i]; end; for j:=1 to 7 do begin b[j]:=random(10); s2:=s2+b[j]; end; if (s1 mod 2)=0 then a1:=true; if (s2 mod 2)=0 then b1:=true; write ('Cума элементов массива: '); for i:=1 to 5 do write (a[i]:2,' '); if a1=true then writeln ('является парным числом') else writeln ('не является парным числом'); writeln; write ('Cума элементов массива: '); for j:=1 to 7 do write (b[j]:2,' '); if b1=true then writeln ('является парным числом') else writeln ('не является парным числом'); end. 0