Ошибка мягко говоря везде. все перепутано и никаккой логики var molusk, n, i: integer; begin; molusk : = 1; writeln('введите время '); readln(n); for i : = 1 to n do if i mod 3 = 0 then molusk : = 2 * molusk; writeln(molusk); end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Подсчитать количество нечетных чисел среди данных n чиселpascalabc, c++)