Ye.Vadim
?>

Функция для определения позиции буквы в слове , не могу найти ошибку. var slovo : string; i : integer; function ups(var s : string; ch : char): integer; var i, n : integer; begin for i: =1 to length(s) do if s[i]=ch then n: =i else n: =0; ups: =n; end; begin writeln('vvedite slovo'); readln(slovo); writeln('n = ', ups(slovo, a)); end.

Информатика

Ответы

buslavgroupe
Ошибок тут больше одной. во-первых, в операторе вывода стоит вызов функции ups, которой в качестве второго аргумента передается неизвестная переменная a. если имелся в виду символ "а", его надо было заключить в одинарные кавычки. во-вторых, в теле функции ups определяется значение n в цикле. даже, если искомый символ найден и n получит значение позиции этого символа в слове, то если слово просмотрено не полностью, следующий же проход по циклу снова сбросит n в ноль. следовательно, эта функция будет выдавать верный результат только если искомая буква - последняя в слове. var   slovo: string;   i: integer; function ups(var s: string; ch: char): integer; var   i, n: integer; begin   i: =1;   n: =0;   while (i< =length(s)) and (n=0) do       begin       if s[i] = ch then n : = i;       i: =i+1       end;   ups: =n end; begin   writeln('vvedite slovo');   readln(slovo); writeln('n = ', ups(slovo, 'a')); end. замечание: в языке паскаль имеется функция pos, производящая поиск подстроки в
bistrayakuhnya46

Спорт денсаулық үшін өте пайдалы болып табылады. Спортпен шұғылдану арқылы біз мықты, шыдамды боламыз және денсаулығымызды нығайтамыз. Біздің мінезіміз шыңдалады, өйткені біз өзімізді жеңуге үйренеміз, сабақ кезінде ауырсынуға жол береміз, мұның бәрі біздің күшімізді дамытады. Көптеген спорт түрлері бар. Жазда біз велосипедпен жүре аламыз, футбол мен волейбол ойнай аламыз, өзен мен көлде жүзе аламыз балалар мен жасөспірімдер скейтборд пен скутермен жүре алады. Ал қыста сіз шаңғы жарыстарымен айналыса аласыз, бір-бірімен жарыса аласыз, конькимен жүгіре аласыз, мәнерлеп сырғанаумен, шаңғымен сырғанаумен айналыса аласыз. Қыста да, жазда да денсаулығыңызға қамқорлық жасау керек. Өйткені, дені сау адам ғана толықтай оқып, жұмыс істей алады, сондықтан бізге сүйікті спорт түрімен белсенді айналысып, физикалық тұрғыдан дамуымыз керек. Спорт-бәрінің басы!

Александрович686
Все модели можно разбить на два больших класса: модели предметные (материальные) и модели информационные. предметные модели воспроизводят , и другие свойства объектов в материальной форме (глобус, анатомические муляжи, модели кристаллических решеток, макеты зданий и сооружений и др.) . информационные модели представляют объекты и процессы в образной или знаковой форме. образные модели (рисунки, фотографии и др. ) представляют собой зрительные образы объектов, зафиксированные на каком-либо носителе информации (бумаге, фото- и кинопленке и др.) . широко используются образные информационные модели в образовании (вспомните учебные плакаты по различным предметам) и науке, где требуется классификация объектов по их внешним признакам (в ботанике, биологии, палеонтологии и др.) . знаковые информационные модели строятся с использованием различных языков (знаковых систем) . знаковая информационная модель может быть представлена в форме текста (например, программы на языке программирования) , формулы (например, второго закона ньютона f=m·a), таблицы (например, периодической таблицы элементов д. и. менделеева) и так далее. иногда при построении знаковых информационных моделей используются одновременно несколько различных языков. примерами таких моделей могут служить карты, графики, диаграммы и пр. во всех этих моделях используются одновременно как язык графических элементов, так и на протяжении своей человечество использовало различные способы и инструменты для создания информационных моделей. эти способы постоянно совершенствовались. так, первые информационные модели создавались в форме наскальных рисунков, в настоящее же время информационные модели обычно строятся и исследуются с использованием современных компьютерных технологий.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Функция для определения позиции буквы в слове , не могу найти ошибку. var slovo : string; i : integer; function ups(var s : string; ch : char): integer; var i, n : integer; begin for i: =1 to length(s) do if s[i]=ch then n: =i else n: =0; ups: =n; end; begin writeln('vvedite slovo'); readln(slovo); writeln('n = ', ups(slovo, a)); end.
Ваше имя (никнейм)*
Email*
Комментарий*