Задание
http://yadi.sk/d/AV8rJ6O5NFGLX Программирование, задача на паскале, сам код уже есть, просто нужно составить блок-схему к этой задаче составить комментарии что означает каждая строка Сама задача: Написать программу нахождения длинного слова в текстовом файле и вывода всех слов наибольшей длины. Словом считать набор символов не содержащий пробелов и ограниченный пробелами, началом/концом строки или знаками препинания Решение: uses crt; const rz=[' ','.',',','-','?','!'];{символы, разделители слов, можно добавить} var f:text; s,s1:string; n,i,k,d,mx:byte; begin clrscr; assign(f,'text.txt'); reset(f);{файл с текстом в папке с программой} {определяем максимальную длину слова} mx:=0; while not eof(f) do begin readln(f,s); n:=length(s); i:=1; while i<=n do if not(s[i] in rz)and ((i=1)or(s[i-1] in rz)) then{если не разделитель и первый или перед ним разделитель, то начало слова*} begin k:=i; d:=0; while (k<=n) and not(s[k] in rz) do {пока не разделитель и не конец строки} begin d:=d+1; k:=k+1; end; if d>mx then mx:=d; i:=i+d+1 end else i:=i+1;{пропускаем разделители} end; close(f); {ищем все слова максимальной длины} writeln('Максимальная длина слова=',mx); writeln('Это слова:'); reset(f); while not eof(f) do begin readln(f,s); n:=length(s); i:=1; while i<=n do if not(s[i] in rz)and ((i=1)or(s[i-1] in rz)) then{если не разделитель и первый или перед ним разделитель, то начало слова*} begin k:=i; s1:=''; while (k<=n) and not(s[k] in rz) do {пока не разделитель и не конец строки} begin s1:=s1+s[k]; k:=k+1; end; if length(s1)=mx then writeln(s1); i:=i+length(s1); end else i:=i+1;{пропускаем разделители} end; close(f); readln end.
Большое спасибо за прекрасную работу! Только сегодня преподаватель оценил на "Отлично". работу выполнили быстро, у преподавателя даже вопросов не возникло) Вы лучшие)
оригинальность 65% оценка 4 Спасибо!
Работу приняли, оценили на четверку. В целом, я довольна.
очень помогло, спасибо
Защита прошла успешно, оценили работу на 5, спасибо!
Ребята отлично справились со своей задачей. Курсовая сдана вовремя, даже раньше положенного срока. Тема была очень сложная, я даже не знала, где литературу и материал искать. Но автор все нашел и грамотно выполнил. Огромное спасибо! Заказываю уже вторую курсовую, ибо времени самой писать нет, а на сайте Заочник сделают ничуть не хуже!
Спасибо большое вашей команде за проделанную работу. Мне было очень приятно работать с вами. Очень быстро реогиравали на не д остатки, на причуды преподавателя спасибо вам всем за хорошую работу. Я и дальше на деюсь на наше сотрудничество.
Спасибо большое менеджеру и автору! Были внесены все необходимые правки и не единожды! Все было выполнено в срок!
Все сделано на отлично и в срок. Каждое решение лаконично описано и разобрано. За работу получил отлично
Заказывала курсовую на довольно тяжелую тему, выполнили быстро, все четко по требованиям, которые были написаны. Большое спасибо, очень довольна! Вы профессионалы своего дела, обязательно буду обращаться ещё)
Тип: Курсовая
Предмет: Основы программирования
Антивирусная защита компьютерной сети
Стоимость: 2200 руб.
Тип: Курсовая
Предмет: Основы программирования
Предмет прогоаммные средства автоматизации
Стоимость: 3200 руб.
Тип: Курсовая
Предмет: Основы программирования
Стоимость: 2200 руб.
Тип: Курсовая
Предмет: Основы программирования
Разработка программного обеспечения для управления клиентсерверной базой данных для предприятия
Стоимость: 1400 руб.
Тип: Курсовая
Предмет: Основы программирования
Сравнительный анализ обработки данных для архитектур sisdmimd
Стоимость: 2200 руб.
Тип: Курсовая
Предмет: Основы программирования
Напишите программу реализующую простой калькулятор на языке pascal
Стоимость: 1900 руб.
Тип: Курсовая
Предмет: Основы программирования
Разработка windowsприложения в среде delphi решение слау методом гаусса
Стоимость: 3200 руб.
Для полноценного разбора темы статьи введем термины и определения, обозначим смысл действия вычитания и выведем правило, согласно которому действие вычитания возможно привести к выполнению действия сложения. Разберем практические примеры. А также рассмотрим действие вычитания в геометрическом толко….
Читать дальшеВ данной теме поговорим о способах решения линейных неоднородных дифференциальных уравнений вида . Начнем с метода вариации произвольной постоянной и покажем способ применения этого метода для решения задачи Коши. Продолжим рассмотрением метода, который предполагает представление произвольной посто….
Читать дальшеЧто такое нок в математике? Продолжим разговор о наименьшем общем кратном, который мы начали в разделе « НОК – наименьшее общее кратное, определение, примеры». В этой теме мы узнаем, как найти наименьшее общее кратное, какие есть для этого способы для трех чисел и более, разберем вопрос о том, как ….
Читать дальшеВ этой статье будут рассмотрены три основных свойства тригонометрических функций: синуса, косинуса, тангенса и котангенса.Первое свойство - знак функции в зависимости от того, какой четверти единичной окружности приналдежит угол . Второе свойство - периодичность. Согласно этому свойству, тигонометр….
Читать дальше