<span>for i:=1 to n do
</span>begin
if a[i]<0 then
begin
k=k+1;
end;
end;
<span>writeln('кол-во отрицательных: ', k);</span>
Байты=524288
биты=4194304
сама такую фигню учу в школе
#include <iostream>using namespace std;int main(){string s;cin>>s;for(int i=6;i>=0;i--)cout<<s[i];}