<h3>PascalABC.NET 3.4.2, сборка 1859 от 08.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var s:=ReadlnString;
s:=s.RegexReplace('[AaBb]','c');
s.Println
end.
<h3>Пример</h3>
A quick movement of the enemy will jeopardize six gunboats.
c quick movement of the enemy will jeopcrdize six guncocts.
Создать переменную, в которой будем хранить сумму (допустим S). Затем обнулить её. Теперь создадим 2 вложенных цикла: по i от 1 до 5, а внутри него по j от 7-i до 5. Внутри второго цикла прибавляем к s элемент из строки i и столбца j. После этих циклов, в S будет содержаться ответ.
Что такое дискретизация? Это нежелательный эффект, который приводит к тому, что качество фотографии заметно ухудшается. Данное явление может быть ассоциировано с любым устройством или же процессом, в котором информация подразделяется на несколько отдельных отсчетов. В данном случае дискретизация может рассматриваться в качестве типа интерференционной картины, если есть определенное соотношение между частотой данного явления и определенной периодической структур - Читайте подробнее на FB.ru: <span>http://fb.ru/article/198004/chto-takoe-diskretizatsiya-chastota-diskretizatsii</span>
var n, i: integer;
begin
write('Введите число: ');
readln(n);
i:=2;
while n mod i <> 0 do
i += 1;
if i = n then
writeln('Простое')
else
writeln('Не простое');
end.