Математическая операция ( MATH ) --> Сложение( + ) --> Вычитание ( - ) --> Геометрические функции ( GEO ) --> объеденение( & ) --> обрезка ( : )
<em>// PascalABC.NET 3.2, сборка 1467 от 02.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var pic:='\b[бвгджзйклмнпрстфхцчшщъь]\S*[аеёиоуыэюя]\b';
ReadlnString('Введите:').MatchValues(pic,RegexOptions.IgnoreCase)
.Println(NewLine)
end.
<u>Пример</u>
Введите: А роза упала на лапу Азора, а Карл у Клары украл кораллы.
роза
на
лапу
Клары
кораллы
<span>Как называется указание на языке HTML - d)тег
Какое сокращение показывает официальный адрес интернет-ресурсов - a) URL </span>
// 1
begin
writeln('M':3);
writeln('MMM':4);
writeln('MMMMM');
writeln('M M':4);
writeln('MMM':4);
end.
// 2
begin
writeln('M');
writeln('MM');
writeln('MMMMMM');
writeln('MM':6);
writeln('M':6);
end.
//3
begin
writeln('M','M':6);
writeln('M':2,'M':4);
writeln('MMMMM':6);
writeln('M M M':6);
writeln('MMMMM':6);
end.
//4
begin
writeln('M':7);
writeln('MM':7);
writeln('MMM':7);
writeln('MMMMM':7);
writeln('MMMMMMM');
end.
//5
begin
writeln('M','M':4);
writeln('MM','MM':3);
writeln('MMMMM');
writeln('MM','MM':3);
writeln('M','M':4);
end.
1. ручка.
2. принтер.
~~~~~~~~~~~~~