С клавиатуры вводится вещественное число. Если число, которое введено, меньше нуля, (т.е отрицательное), то на экран выводится текст "Отрицательное число", в противном случае (т.е при вводе числа больше или равного нулю) на экран выводится сообщение "Положительное число"
<span>Б) компьютерные вирусы
являются преднамеренной угрозой информации
</span>
PROGRAM LOL;
VAR S:STRING;
I,K,L:INTEGER;
BEGIN
READLN(S);
for i:=1 to length(s) do
begin
if ('a'<=s[i]) and (s[i]<='z') then
k:=k+1;
if('A'<=s[i]) and (s[i]<='Z') then
k:= k+1;
if ('0'<=s[i]) and (s[i]<='9') then
l:=l+1;end;
if(k>l) then
write('в тексте больше букв')
else write('в тексте больше чисел');
<span>end.</span>
Семантическая сеть во вложении
1) 1024*468*х=468*1024*8
479232*х=3833856
х=8 бит
цветов.
2) 512*96*16*60*4=188743680 бит = 23040 КБайт=22,5 МБайт
3)
→ i=8 бит
512*192*8*65*12=613416960 бит = 74880 Кбайт = 73,125 Мбайт