Яку команду слід обрати для присвоення змінни S значення О?​

var a,b: string; begin                            cls;   read(a);     b: =a;           write('b')end.           

var s,r: real;

begin

  read(r);

  s: =pi*sqr(r);

  writeln(s: 0: 4);

end.

автоматизация, легкость в использовании, меньше затраты времени на обработку

var

a: integer;

begin

readln(a);

writeln(a*(a div 10 + (a mod 10)*10));

end.