Запиши мантиссу числа и порядок числа 21600=0,216⋅105.

страус- самая крупная в мире птица. не летает

var a,s: integer; begins: =0; writeln('введите числа'); repeatreadln(a); if (a> 9)and(a< 99) thens: =s+a; until a=0; writeln(s); end.

var a: array [1..10] of integer;

      s: real;

      n,i: integer;

begin

  n: =0;

  s: =0;

  for i: =1 to 10 do begin 

    readln(a[i]);  

    if a[i]< 0 then s: =s+a[i];

    if a[i] mod 2 =0 then n: =n+1;

                            end;

  writeln(s,', ',n);

end.

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