1 нет,т.к. чередуется гласная, гласная
2 нет,т.к. заканч.на А
3 нет, т.к.начинается не на АЕИ
Ответ:
4. ИБИ
Два текстовых файла можешь копировать в PascalABC.NET оба рабочие. Первый с динамическими массивами под PascalABC.NET второй -статические массивы для FreePascal.
Ответ:
сладкий-вкусовая
Объяснение:
простым языком можно сказать, если ты слышишь - аудильная, видишь - визуальная, чувствуешь прикосновения и тд. - тактильная, чувствуешь запах - обонятельная, чувствуешь вкус - вкусовая.
Ну алгоритм: просто суммируешь поочерёдно.(можно кубиками нарисовать, но это мне делать не удобно, тем более не сложно)
Вот прога на паскале:
program sym
var p:array[1..12] of integer;
s,i:integer;
Begin
s:=0;
For i:=1 to 12 do
p[i]:=i*i; //если нет уже готового массива
For i:=1 to 12 do
s:=s+p[i];
write(s)
end.
Ну тут кстати массив излишен, если надо просто найти сумму:
program sym1
var s,i:integer;
Begin
s:=0;
For i:=1 to 12 do
s:=s+i*i;
write(s)
end.
Я у себя не проверял, но должно работать)