Дан массив из 60 элементов(заполнен через датчик случайных чисел: числа от 10 до 45. все его элементы возвести в квадрат

1)

uses graphabc; begin window.title : = 'circle'; var x,y,r,i: integer; brush.color : = clgreen; y: =20; x: =70; r: =25; for i : = 1 to 7 do circle(x,y+i*60,r); end.

2)

uses graphabc; begin window.title : = 'circle'; var x,y,r,i: integer; brush.color : = clgreen; y: =20; x: =20; r: =30; for i : = 1 to 5 do circle(x+i*70,y+i*70,r); end.

3)

uses graphabc; begin window.title : = 'circle'; var x,y,r,i: integer; brush.color : = clgreen; y: =70; x: =30; r: =60; for i : = 1 to 5 do circle(x+i*60,y,r); end.

создать программу или составить алгоритм? с готовой программой нечего не научишся, прийми програмирование как искуство и твори

вобщем алгоритм такой:

0)вводиш строку

1)создаеш масив содержащий координаты букв "я" какие нарушают правило и возьмем длинну масива например такую как длинна строки пополам.

2)в цикле от 1 (0 в с++) до длинны строки выполняеш следующее:

  2.1)если i-й елемент строки равен "ч" а i+1 равен "я" то колво ошибок = колво +1;                             записываем в масив i+1

  2.2)если i-й елемент строки равен "щ" а i+1 равен "я" то колво ошибок = колво +1;   записываем в масив i+1

3) в цикле от 1(0 в с++) до колво ошибок все елементы строки координаты которых лежат в масиве, меняем на букву "я".

4) выводим на екран результат.