Үй тапсырмасы
1. 20-дан 50-ге дейін натурал сан берілген. 3-ке бөлінетін,
бірақ 5-ке бөлінбейтін сандарды баспаға шығарыңдар.
паже и второе пожее​

Язык программирования не указан, потому - самый простой вариант - программа на паскале. Даже на паскале задачу можно решать различными с массивом, без массива, со строками, без строк. Опять-таки, самый простой вариант - со строками.
var s,p:string; n,i:integer;
begin
writeln('Введите символы:');
readln(s);
n:=pos('.',s)-1;
writeln('n = ',n);
p:='';
for i:=1 to n do p:=s[i]+p;
writeln('а)');
writeln(p);
p:='';
if n mod 2 = 0 then i:=2 else i:=1;
while i<=n do
 begin
 p:=p+s[i];
 i:=i+2;
 end;
writeln('б)');
writeln(p);
end.

Пример:
Введите символы:Даны символы s1, s2, ... Известно, что символ s1 отличен от точки
n = 21
а)
 ,2s ,1s ыловмис ынаД
б)
Дн ивл 1 2 

Цикл while

Пишется так:

while условие do

begin

Тело цикла

end;

Выполняет тело цикла (команды между begin и end;) пока соблюдено условие в заголовке цикла.

Пример:

while x<100 do

begin

x:= x+1;

end;

Прибавляет к переменной x единицу пока x меньше ста. Если x больше ста, то цикл заканчивается.

Числа Фибоначчи

Последовательность начинается с 0 1

Каждое следующее число равно сумме двух предыдущих

0 1 1 (0+1=1)

0 1 1 2 (1+1=2)

0 1 1 2 3 (1+2=3)

0 1 1 2 3 5 (2+3=5)

и т.д.

Одномерные массивы

Массив можно представить как ряд из ящиков

каждый ящик имеет свой номер (индекс)

в ящике лежит значение (цифры или символы)

Объявляются как переменные в начале программы:

program raf105

var название:array[количество элементов] of тип;

количество элементов пишется как диапазон от минимального значения индекса (Индекс это число в квадратных скобках) до максимального между ними ставятся две точки

Пример:

program raf105

var X:array[1..10] of integer;

Это массив под названием X с 10-ю элементами типа integer

Обращение к массиву

Название[индекс]

Пример:

x[8]:= 101;

Мы присвоили восьмому элементу массива под названием x значение 101