const n = 20;
var
a, b: array[1..n] of integer;
i, count: integer;
begin
for i := 1 to n do begin
a[i] := 1 + random(5);
b[i] := 1 + random(5);
if(a[i] = b[i]) then begin
writeln('Номер: ', i, ' Значение: ', a[i]);
inc(count);
end;
end;
if(count = 0) then writeln('Совпадений нет');
end.
Примеры алгоритмов.( если нужен пример программы обратитесь в ЛС).
1- Ветвление.
If a>=0 then
S:=S+a
else
S:=S-a;
2- "С повтором" или циклический.
For i:=1 to 6 do
S+1;
или
while i<5 do
i:=i+1;
3-Линейный.
S:= a;
i:=S+z; и.т.д. (Не имеется циклов)
Ответ:
11111110001 = 2033; 4321=586; 18B=395; 0,347
Объяснение:
Переводим сантиметры в дюймы, получаем изображение 10х12 дюймов, следовательно изображение получается 1500х1800 точек
следовательно общий объем
1500*1800*32 = 86400000 бит = 10800000 байт
Разрешающая способность 200 dpi означает, что на отрезке длиной 1 дюйм сканер различит 200 точек.
Необходимо перевести разрешающую способность в точки на сантиметр (1 дюйм=2,54см):
200 dpi/2.54=79точек/см
Следовательно, размер изображения в точках будет 1659*2291 точек
Общее количество точек равно 1659*2291=3800769
Объем рисунка равен 16*3800769=60812304бит=7601538байт=7423 Кб=7,2Мб