Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi
Войти
Регистрация
Восстановить пароль
 
LeDep
74 / 74 / 44
Регистрация: 12.02.2011
Сообщений: 380
#1

Составить блоксхему - Delphi

31.08.2012, 08:32. Просмотров 378. Ответов 3
Метки нет (Все метки)

Составить блоксхему по коду:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
     if pos(s1,Zagadal)>0 then Begin   //Если наш символ есть в тексте, то записываем его в StringGrid2
         for i:=1 to length(Zagadal) do Begin //Проходим по всей длине загаданного слова
             if Zagadal[i]=s1 then Begin  //
                 StringGrid2.Cells[i-1,0]:=s1;//Каждый одинаковый символ записываем в соотв. ему позиции
             end;  //Т.е. если в слове 3 буквы О, то все 3 и запишутся в StringList2 на их позиции из ответа
         end;
      end;   //Закончили проверку встречи символа
 
 
     {tempS - это временная строка, которая составляется из символов внутри StringGrid2
      Рассматриваем StringGrid2 как строку и заполняем tempS, исходя из наличия в StringGrid2 символов}
   for i:=0 to StringGrid2.ColCount do Begin
    tempS:=tempS+StringGrid2.Cells[i,0];
 
    {Очищаем пробелы из TempS}
    for j:=length(tempS) downto 1 do Begin
        if pos(' ',tempS)>0 then delete(tempS,pos(' ',tempS),1);
    end;
   end;   //Закончили работу с TempS
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.08.2012, 08:32
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Составить блоксхему (Delphi):

Нарисовать блоксхему
Нужно нарисовать блоксхему. подскажите пожалуйста. unit Unit1; interface ...

Составить программу выясняющую, можно из букв входящих в слова Х, составить слово Y
Если у кого есть такая лаба, буду искренни благодарен за нее:) Ну или может...

Составить блоксхему
Помогите составить блоксхему к программе uses crt; type Vedom=record ...

Составить блоксхему
Помогите составить блоксхему плз const nmax=20; var a: array of...

Составить блоксхему
Пробовал через программу, которая сама делает схему по коду, но получилась...

Прокомментировать код и составить блоксхему
Добрый вечер всем прошу помочь с кодом, а именно с комментарием к каждому...

3
xNeKiToSx
330 / 83 / 16
Регистрация: 10.01.2011
Сообщений: 516
Записей в блоге: 1
31.08.2012, 08:44 #2
http://www.cyberforum.ru/freelance/
0
tuluku
5 / 5 / 1
Регистрация: 22.03.2012
Сообщений: 78
31.08.2012, 09:27 #3
Основные элементы можно посмотреть здесь: http://ru.wikipedia.org/wiki/%D0%91%...B5%D0%BC%D0%B0
и здесь: http://www.progivsem.ru/content.blok.php

Для представленной Вами части кода нужно использовать:

1. Ромбы(Блоки условий) - для операторов if. В ромбах пишутся сами условия.

2. Шестиугольники(Блоки модификации по второй ссылке) - для операторов for. В фигуре пишем что-то типа i=0,StringGrid2.ColCount - это границы цикла. (Обычно над значениями границ проводят черту, как над векторами в математике).

3. Прямоугольники(Блоки вычислений) - все выражения в которых есть знак присваивания, функции, процедуры. Например: StringGrid2.Cells[i-1,0]:=s1; Подобные выражения записываются внутри прямоугольников.
0
CodeR
Фрилансер
3379 / 2781 / 2999
Регистрация: 08.02.2012
Сообщений: 6,651
Записей в блоге: 1
31.08.2012, 09:39 #4
.........
1
Миниатюры
Составить блоксхему  
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.08.2012, 09:39
Привет! Вот еще темы с решениями:

Помогите составить блоксхему к программе
Помогите составить блоксхему к программе: Program Zadacha_3; uses crt;...

составить блоксхему по этой задиче
program laba_1; uses crt; var s,c,i,j:byte; type mas=array of byte;...

Задано вещественное значение аргумента х. Составить блоксхему и программу вычисления значения функции у
Задано вещественное значение аргумента х. Составить блок-схему и программу...

Найти наименьший и наибольший элемент заштрихованной области заданной квадратной матрицы (составить блоксхему)
Дано натурально число n. Сформировать произвольную матрицу размерностью n*n....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru