Задача 18. Реализован некоторый алгоритм в виде блок-
схемы (рис. 33). Вывести значение переменной min, если:
а) a=5, b=8, c=3;
б) a=9, b=2, c=4;
в) a=4, b=2, c=7;
г) a=5, b=5, c=1.

var a,b,c,min:integer;

begin

readln(a);

readln(b);

readln(c);

min:= a;

if min > b then min:= b;

if min > c then min:= c;

writeln(min);

end.

а) 3

б) 2

в) 2

г) 1

эти знаки изображали человека и части его тела, орудия труда, оружие, лодки, животных, птиц, рыб, растения, поля, воды, горы, звёзды и т. д. - т.е. конкретные предметы. это было начало письма. письменные знаки, засвидетельствованные древнейшими памятниками, могут быть без труда возведены к их первоначальному рисуночному образу.

1) 

var

s: string;

begin

s: ='пробел';

writeln(s);

delete(s,4,1);

insert('д',s,4);

writeln(s);

end.

2)

var

i: integer;

a,b: string;

begin

readln(a);

b: ='';

for i: =1 to length(a) do

b: =b+a[i]+' ';

writeln(b);

end.

3)

var

a: string;

begin

readln(a);

if a[2]=a[4] then writeln('равны')

else  writeln('не равны');

end.