Впиши в фигуры название растений из списка 3 класс 3 раздел 33

укрытся одеялом и лечь спать,   и пить лекартва и остаться дома

program p;

var s,a,b,c: string; begins: =' фигуры'; writeln('введите названия трёх фигур'); read(a,b,c); writeln(s,': ',a,', ',b,' и ',c); end. 

триста восемьдесят девять миллиардов,триста шестьдесят пять миллионов, четыреста две тысячи, двести один.

program vvl;

var x: integer;

      v: real;

begin

write('x=');

readln (x);

v: = abs(a)-2;

writeln ('v='; v: 2: 1);

end.