Если числа нечётные, то их сумма будет чётной. Смотрите:
( 2n+1)+(2n+1)=4n+2.
Соответственно если 3+9=12 (чётное) и с другими примерами аналогично.
<span>var a, b, c, d: integer;
begin
readln(a);
</span>readln(b);
readln(c);
readln(d); <span>
writeln('ab+cd=',a*b,'+',c*d,'=', a*b+c*d);
readln;
end.</span>
Развитие компьютерных сетей происходило, в первую очередь, за счет развития двух более крупных направлений технологии – вычислительной техники и коммуникаций. Первые попытки создать возможность работы с вычислительной техникой нескольких пользователей заключались в загрузке в мэйнфрэйм (основной компьютер) нескольких готовы пакето данных, которые были заранее подготовлены и нуждались в обработке.
Первоначальное развитие этой технологии происходило на протяжении 50-х годов XX века, когда компьютеры представляли собой громоздкие и неудобные устройства, обрабатывающие информацию крайне длительное время. На тот момент удобство пользователя находилось на одном из последних мест в развитии, а основное внимание уделялось повышению мощности.
Следующим прообразом компьютерных сетей стало создание отдельных терминалов, имеющих полноценные собственные устройства ввода-вывода и работающие напрямую с одним общим компьютером. Для самого пользователя работа за таким устройством была куда более удобной – он мог не замечать, что мощности компьютера параллельно используются еще несколькими людьми. Именно тогда стали появляться первые сети, чей принцип работы заключался лишь в банальном физическом удалении терминалов на определенные расстояния.
Как только начали появляться более компактные компьютеры – это произошло в 70-х годах, позволить себе их установку могли все больше предприятий, поэтому необходимость использования какого-либо средства связи возрастала и тогда возникли первые приближенные к современным способы объединения компьютеров в сеть и потребность в монтаже компьютерных сетей.
Писал уже:
var input, num, nulls, positive, negative, i: integer;
begin
write('Введите кол-во чисел: ');
readln(input);
for i := 1 to input do begin
write('Введите число номером ', i, ': ');
readln(num); if num = 0 then inc(nulls, 1);
//if num < 0 then inc(negative, 1);
//if num > 0 then inc(positive, 1);
end;
writeln('Кол-во нулей: ', nulls);
//writeln('Кол-во положительных чисел: ', positive)
//writeln('Кол-во отрицательных чисел: ', negative);
<span>end.</span>
#include<iostream>#include <stdlib.h>using namespace std;int main(){int a[10], i = 9, n=0;for (i; i >0; i--){ a[i] = rand () % 10 + 1; if ( a[i] % 2 == 0){ n++; } cout << a[i] << endl;}cout << "n" << "=" << n;
}