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 Мбайт
Uses Crt;
const n=10;
var
A: array[1..n] of integer;
i,f,f1: integer;
begin
clrscr;
f:=-1;
f1:=-1;
for i:=1 to n do
begin
writeln('введите',i,' элемент массива ');
readln (A[i]);
if A[i]>0 then
begin
f1:=A[i];
if f<0 then
f:=A[i];
if f>f1 then
f:=A[i];
end;
end;
writeln('наименьшее положительное', f);
readln;
end.
1. Делаем замены, упрощающие понимание
- "не(число делится на 7)" эквивалентно "<span>число не делится на 7"
- </span>"<span>не(число >32)" эквивалентно "</span><span>число ≤ 32"
2. Переписываем исходное утверждение в новой формулировке:
</span><span>Для какого из приведённых чисел ложно выражение</span>
"<span>число не делится на 7" ИЛИ </span>"число ≤ 32"
Если два высказывания связаны по ИЛИ, то выражение ложно, когда ложны оба высказывания.
Итак, условие ложно если:
- число делится на 7 И ПРИ ЭТОМ число больше 32.
Это <u>любые числа, которые больше 32, делящиеся на 7.</u>
На картинке: Компьютер (интернет ресурсы); Книги (литература).
Также, информацию можно найти в библиотеках, архивах, в научных центрах и через общение( можно получить информацию).
Const n = 15;
var a: array[1..n] of integer;
i, j, m: integer;
begin
// генерация и вывод
randomize;
for i := 1 to n do a[i] := Random(19)-8;
for i := 1 to n do write(a[i], ' ');
writeln;
// Сортировка
for i := 1 to n-1 do begin
m := i;
for j := i+1 to n do
if a[j] < a[m] then m := j;
if m <> i then begin
j := a[m];
a[m] := a[i];
a[i] := j;
end;
end;
for i := 1 to n do write(a[i], ' ');
writeln;
// поиск наибольшей разности
m := a[2] - a[1];
for i := 3 to n do
if a[i] - a[i-1] > m then
m := a[i] - a[i-1];
writeln ('разность = ', m);
<span>end.</span>