Информатика 9 класс .) начальное состояние: исполнитель находится в нижнем правом углу и смотрит вверх. где будет исполнитель после выполнения следующих программ? а) пока впереди не край повторять нц прыжок кц поворот поворот пока впереди не край повторять нц прыжок кц б) пока впереди не край повторять нц прыжок поворот прыжок поворот поворот поворот кц )составьте алгоритм, переводящий графического исполнителя (грис) в угол поля из любого исходного положения. )дан следующий алгоритм: пока впереди не край повторять нц поворот кц при каком исходном положении графического исполнителя данный алгоритм зациклится?
Ответы
Нету изображения среды исполнения, поэтому решить не получится.
Вусловии нечетко указано, какой символ искать: "о" - это может быть и латинская буква, и кириллическая. в программе предполагается, что это латинский символ, в противном случае его достаточно заменить в const на нужный. const c: char='o'; var s: string; i,k: integer; begin write('введите строку: '); readln(s); k: =0; for i: =1 to length(s) do if s[i]=c then inc(k); writeln('символ "',c,'" встречается ',k,' раз(а)') end. тестовое решение: введите строку: learn wisdom by the follies of others символ "o" встречается 4 раз(а)
Совершенное число - натуральное число, равное сумме всех своих собственных делителей (то есть всех положительных делителей, отличных от самого числа). //pascal var n, s, i: integer; begin s : = 0; readln(n); // находим делители до n-1, увеличиваем сумму s на i, // если i - делитель введенного числа for i : = 1 to n - 1 do if n mod i = 0 then s : = s + i; if s = n then writeln('cовершенное') else writeln('не совершенное'); end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Составьте программу для visual basic
Автор: Irinagarmonshikova
Как добавить цикл в программу
Автор: shchepinasm
Паскаль. вычислить сумму ряда 1+1.5+2+2.5++30.
Автор: vovababkin1477
Это какой-то термин из информатики
Автор: Ни Дмитрий1095
Нужно написать алгоритм для нахождения нод двух чисел в паскале
Автор: smartschoolfili6