Переделать программу под оператор read program n_1; const pi= 3.14; bar= r, c, s: real begin r: =5.4; c: = 2*pi*r; s: =pi*r*r; writeln ('c=', c: 6: 4); writeln ('s=', s: 6: 4) end

Program n_1;
var r,c,s: real;
begin
readln(r);
c:= 2*pi*r;
s:=pi*r*r;
writeln ('c=', c:6:4);
writeln ('s=', s:6:4)
end.

Пример:
5
c=31.4159
s=78.5398

2. процессор-микропроцессор, который выполняет задачи, алгоритмы, управляя компьютером.
системный блок-большая коробка, корпус, в котором находятся все комплектующие компьютера.
3. это конечная последовательность однозначных предписаний, исполнение которых  позволяет с конечного числа шагов получить решение задачи, однозначно определяемое исходными данными.
4.стационарный или подвижный объект, который представляет собой комплекс технических средств обработки информации, предназначенный для выполнения определенных функций

Var
 x,a,b,c,max,min,mid:real;
begin
 readln(x);
 a:=sin(x);
 b:=cos(x);
 if a>0 then
  begin
   c:=ln(x);
   if (a>b) and (a>c) then max:=a else
   if (b>a) and (b>c) then max:=b else max:=c;
   if (a<b) and (a<c) then min:=a else
   if (b<a) and (b<c) then min:=b else min:=c;
   if (a>min) and (a<max) then mid:=a else
    if (b>min) and (b<max) then mid:=b else mid:=c;
   writeln(min,' ',mid,' ',max);
  end
 else
  if a>b then writeln(b,' ',a) else writeln(a,' ',b);
end.