Надсистемой Земля явл.для атмосферы Земли
Надсистема для Земли:Солнечная система
Наведу на мысль
var x,z:integer;
BEGIN
readln(x);
writeln(xmod10);
x=xdiv10;
writeln(xmod10);
x=xdiv10;
writeln(xmod10);
x=xdiv10;
end.
исправь ошибки если есть
Var N, a, b: integer;
begin
readln(N);
a := N div 5;
N := N mod 5;
b := N div 2;
WriteLn(a, 'x5, ', b, 'x2, ', N mod 2, 'x1');
<span>end.
Вот так, делением можно)</span>
Буууууууууддддддеееееетттттть 1102
вставляешь батарейки и еще в покупном пакете есть юсби штучка
ее втыкаешь
и все работает
будет, конечно