Var a,s1,s2,i:integer;
begin
a:=random(4901)+100;
writeln('a = ',a);
s1:=0; s2:=0;
for i:=1 to 4 do
begin
if a mod 2 = 0
then s1:=s1+a mod 10 else s2:=s2+a mod 10;
a:=a div 10;
end;
writeln('Сумма чётных цифр = ',s1,' Сумма нечётных цифр = ',s2);
end.
Пример:
<span>a = 4683
Сумма чётных цифр = 18 Сумма нечётных цифр = 3</span>
В далекие времена, когда еще не существовало современных технологий, людям приходилось быть весьма практичными, поэтому для бытовых нужд использовались самые неожиданные предметы. Для письма в Древней Индии приспосабливали, например, камни, и очень часто - пальмовые листья, поскольку те были более удобными.Первоначально листья высушивали, а после этого нарезали длинными и узкими кусочками. Чаще всего использовали листья пальмы талипот, которые можно было легко размягчить перед сушкой.
Сходства:
Одинаковый размер (диаметр 120 мм, толщина 1.6 мм), имеет тот же радужный вид. Лазерный принцип записи.
Различия:
CD-диск использует инфрокрасный лазер (длина волны в возухе 780 нм), а DVD-диск использует красный лазер (650 нм) (меньшая длина волны позволяет более плотнее размещать информацию на DVD-дисках).
Ёмкость DVD (4.7 ГБ) сильно различается от ёмкости CD (700 МБ)