⇢ 
Евгений Шепилев
переведите с Pascal в C++
program piramide;
var i,ii:char;
j:integer;
begin
for i:='a' to 'z' do
begin
write(' ':(14-(ord(i)-ord('a'))div 2));
for ii:='a' to i do
write(ii);
writeln;
end;
readln;
end.