<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadlnString.Select(t -> LowCase(t) in ['а', 'б'] ? 2 * t : t)
.JoinIntoString('').Println
end.
<h2>А роза упала на лапу Азора</h2><h2>АА розаа упаалаа наа лаапу ААзораа</h2>
Компьютерная графика<span> — область </span>информатики<span>, которая изучает методы и способы создания и обработки изображений на экране компьютера с помощью специальных программ. В зависимости от способа формирования изображений компьютерную </span>графику <span>подразделяют на растровую и векторную.
_____________________________________________________________
</span><span>Растровое изображение - это изображение, в основе которого лежит таблица.
</span>Достоинства растрового изображения:
⇒ реалистичность изображения;
⇒ возможность изображать на растровом изображении все, что угодно;
⇒ применение к растровым изображениям разнообразных эффектов;
⇒ использование растровых форматов изображений при создании веб-страниц в Интернете.
Недостатки растровых изображений:
⇒ плохое масштабирование растровых изображений; увеличение его без потери качества невозможно;
⇒ невозможность разбить растровое изображение на части и редактировать каждую из них;
⇒ размер растрового изображения <span>больший по сравнению с векторным.</span>
Объяснение:
Исходное слово: Дорога.........
Program gt;
var a:real;
i:longint;
begin
i:=0;a:=1;
while i<5 do
begin
i:=i+1;
a:=8/100*a+a;
end;
writeln(3000/a);
end.<span>
</span>