var t,o:array [1..30] of integer; d,s,i:integer; begin randomize; writeln ('Kol-vo osadkov: '); for i:=1 to 30 do begin o[i]:=random(20); write (o[i],' ,'); if i=15 then writeln; end; writeln; writeln ('Temperatura vozduxa: '); for i:=1 to 30 do begin t[i]:=random(26)-15; if (t[i]>0) and (o[i]<>0) then d:=d+o[i] else if (t[i]<0) and (o[i]<>0) then s:=s+o[i]; write (t[i],','); if i=15 then writeln; end; writeln; writeln ('Kol-vo osadkov v vide snega: ',s); writeln ('Kol-vo osadkov v vide dozhdya: ',d); readln; end.
Вся информация в компьютере, как известно, кодируется и передаётся с двоичных значений 0 и 1. Любое устройство компьютера, производящие обработку или хранение информации, получает на входе один или несколько сигналов, представляющих собою электрические импульсы ("1" - есть сигнал, "0" - нет сигнала), а на выходе выдаёт один результирующий сигнал. Существует три базовых логических элемента: "И", "ИЛИ", "НЕ". Комбинируя эти три вида элементов, можно собрать логическое устройство какой угодно сложности. Логический элемент "И" получает на входе 2 сигнала. На выходе выдаётся один сигнал, являющийся результатом операции логического умножения входных сигналов. Проще говоря, если хотя бы один из входных сигналов равен "0", то и на выходе будет "0". Логический элемент "ИЛИ" тоже получает на входе 2 сигнала. На выходе выдаётся один сигнал, являющийся результатом операции логического сложения входных сигналов. Если хотя бы один из входных сигналов равен "1", то и на выходе будет "1". Логический элемент "НЕ" получает на входе 1 сигнал. На выходе выдаётся один сигнал, являющийся результатом операции инверсии входного сигнала (если на входе "1", то на выходе "0", и наоборот).
var
t,o:array [1..30] of integer;
d,s,i:integer;
begin
randomize;
writeln ('Kol-vo osadkov: ');
for i:=1 to 30 do begin
o[i]:=random(20);
write (o[i],' ,');
if i=15 then writeln;
end;
writeln;
writeln ('Temperatura vozduxa: ');
for i:=1 to 30 do begin
t[i]:=random(26)-15;
if (t[i]>0) and (o[i]<>0) then d:=d+o[i] else
if (t[i]<0) and (o[i]<>0) then s:=s+o[i];
write (t[i],',');
if i=15 then writeln;
end;
writeln;
writeln ('Kol-vo osadkov v vide snega: ',s);
writeln ('Kol-vo osadkov v vide dozhdya: ',d);
readln;
end.
Вся информация в компьютере, как известно, кодируется и передаётся с двоичных значений 0 и 1. Любое устройство компьютера, производящие обработку или хранение информации, получает на входе один или несколько сигналов, представляющих собою электрические импульсы ("1" - есть сигнал, "0" - нет сигнала), а на выходе выдаёт один результирующий сигнал.
Существует три базовых логических элемента: "И", "ИЛИ", "НЕ". Комбинируя эти три вида элементов, можно собрать логическое устройство какой угодно сложности.
Логический элемент "И" получает на входе 2 сигнала. На выходе выдаётся один сигнал, являющийся результатом операции логического умножения входных сигналов. Проще говоря, если хотя бы один из входных сигналов равен "0", то и на выходе будет "0".
Логический элемент "ИЛИ" тоже получает на входе 2 сигнала. На выходе выдаётся один сигнал, являющийся результатом операции логического сложения входных сигналов. Если хотя бы один из входных сигналов равен "1", то и на выходе будет "1".
Логический элемент "НЕ" получает на входе 1 сигнал. На выходе выдаётся один сигнал, являющийся результатом операции инверсии входного сигнала (если на входе "1", то на выходе "0", и наоборот).