Определить закономерность в расположении чисел и продолжи ряд. 1,3,6,4,_ _ _ _. объяснить закономерность.

я думаю так:

нечетный ряд чисел ( то есть первая цифра, третья, пятая, седьмая) увеличивается на 5, а четный (вторая, четвертая, шестая) на 1

 

1,3,6,4,11,5,16,6

Var x,y,z: longint; begin writeln(' test'); writeln(' выберите верный вариант ответа 1,2 или 3'); writeln(' сюда вбиваешь вопрос '); writeln('1.сюда варианты ответов); writeln('2.сюда варианты ответов); writeln('3.сюда варианты ответов); read(x); if (x=номер верного варианта) then y: =y+1; writeln(' сюда вбиваешь вопрос '); writeln('1.сюда варианты ответов); writeln('2.сюда варианты ответов); writeln('3.сюда варианты ответов); read(x); if (x=номер верного варианта) then y: =y+1; writeln(' сюда вбиваешь вопрос '); writeln('1.сюда варианты ответов); writeln('2.сюда варианты ответов); writeln('3.сюда варианты ответов); read(x); if (x=номер верного варианта) then y: =y+1; if (y=3)then write('ваша оценка 5'); if  (y=2)then write('ваша оценка 3'); if  (y=1)then write('ваша оценка 2'); end. p.s.прошу проверить на ошибки а тест думаю вы и сами составите надеюсь всё правильно т.к. давно не работал на паскале