Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
masterstvo2012
0 / 0 / 0
Регистрация: 23.03.2014
Сообщений: 126
#1

Начертить блок схему по коду пргограммы

19.05.2014, 11:22. Просмотров 321. Ответов 2
Метки нет (Все метки)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
uses
    crt;
procedure Find;
var
   i: Integer;
   n1, n2: Integer;
begin
     for i := 10 to 99 do
         begin
              n1 := i div 10;
              n2 := i mod 10;
              if (n1 + n2) * (n1 + n2) * (n1 + n2) = i * i then
                 begin
                      writeln(i, ' - подходит, решение найдено...');
                      exit;
                 end
              else
                  writeln(i, ' - не подходит ', (n1 + n2) * (n1 + n2) * (n1 + n2), ' не равно ', i*i);
         end;
end;
 
begin
     clrscr;
     writeln('Выполняется поиск...');
     Find;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.05.2014, 11:22
Ответы с готовыми решениями:

Начертить Блок Схему по заданию с циклом пока/до. Написать программу
Начертить Блок Схему по заданию с циклом пока/до. Написать программу. Найти...

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

Составить блок-схему к коду.
Помогите пожалуйста(((Очень прошу:( Нужно составить блок-схему по программам((...

Составить блок-схему к коду.
const nmax=16; var a:array of char; b:array of char; m,n,i,j:byte; ...

Составить блок-схему к коду
program noname; uses Crt; const n=20; var a:array of Integer;...

2
masterstvo2012
0 / 0 / 0
Регистрация: 23.03.2014
Сообщений: 126
05.06.2014, 11:18  [ТС] #2
У меня в программе чертить только 3 блока а надо полностью, препод не принимает
0
РЕНАТИКК
1 / 1 / 0
Регистрация: 03.05.2014
Сообщений: 26
05.06.2014, 15:32 #3
блок-схема
1
Миниатюры
Начертить блок схему по коду пргограммы  
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.06.2014, 15:32

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

Нарисовать блок-схему по коду
вот текст программы var i, k, n: longint; p, s, x: double; begin ...

Построить блок-схему по коду
Помогите построить блок схему program d; var n,i: integer; p,t: real;...


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

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

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