// PascalABC.NET 3.1, сборка 1184 от 02.03.2016
uses GraphABC; // графическая библиотека
begin
Pen.Color:=clBlue; // выбрать перо синего цвета
Pen.Width:=3; // толщина пера 3 пикселя
DrawCircle(100,120,50); // окружность c центром (100,120) и R=50
Brush.Color:=clPink; // кисть розового цвета
FillCircle(100,120,50) // закрасить окружность
end.
Там где символы не понятные это разделители задач, 3 из 4
program task;
const n=15;
var a:array[1..n] of integer;
i,s,j,first,max: integer;
begin
óñëîâèå À
begin
a[i]:=0+random(15);
write(a[i]:4);
if(i mod 2=0) then
s:=s + a[i];
end;
çàäà÷à Á
begin
a[i]:=0+random(15);
write(a[i]:4);
end;
writeln();
max:=1;
for i:=1 to n do
if a[i]>a[max] then max:=i;
first:=a[1];
a[1]:=a[max];
a[max]:=first;
writeln('Âåêòîð:');
for i:=1 to n do
çà÷à Â
for i:= 1 to 15 do begin
a[i]:= random(20);
write(a[i],' ');
if a[i] > 0 then
end;
writeln;
writeln;
for i:= 1 to 14 do
for j:= i+1 to 15 do
if a[i] < a[j] then begin
max:= a[i];
a[i]:= a[j];
a[j]:= max;
end;
for i:= 1 to 15 do begin
write(a[i],' ');
end;
end.
В таких задачах идем с конца меняя знаки операций на противоположные, затем собираем алгоритм с конца меняя знаки операций:
50 / 2
25 - 1
24 / 2
12 / 2
6 / 2
3 - 1
2 / 2
1-1
0
Получим :21211121
До второй половины XIX в. – «ручная» информационная технология, инструментами при котором были перо, чернильница, бумага;
С конца XIX в. – «механическая» технология, инструментарий которой составляли пишущая машинка, телефон, диктофон, почта;
1940—1960-е гг. XX в. – «электрическая» технология, инструментарий которой составляли большие электронно-вычислительные машины (ЭВМ) и соответствующее программное обеспечение, электрические пишущие машинки, ксероксы, портативные диктофоны;
С начала 1970-х гг. – «электронная» технология, основным инструментарием являются большие ЭВМ и создаваемые на их базе автоматизированные системы управления (АСУ) и информационно-поисковые системы (ИПС), которые оснащены широким спектром программных комплексов;
С<span> середины 1980-х гг. – «компьютерная» технология, основной инструментарий – ПК с широким спектром стандартных программных продуктов разного назначения.</span>