| skinline | Дата: Воскресенье, 18.12.2011, 16:13 | Сообщение # 1 |
|
Рядовой
Группа: Пользователи
Сообщений: 1
Статус: Offline
| помогите пожалуйста составить блок-схему программы:
program naoborot1;
uses crt;
var
stroka: string;
naoborot: string;
tekstr: string;
i: byte;
begin
WriteLn('Введите фразу или слово');
ReadLn (stroka);
tekstr:=' ';
for i:= length(stroka) downto 1 do
begin
tekstr:= tekstr + stroka [i];
end;
naoborot:= tekstr;
WriteLn (naoborot);
ReadLn;
end.
|
| |
| |
| diamFC | Дата: Воскресенье, 18.12.2011, 17:25 | Сообщение # 2 |
|
Полковник
Группа: Администраторы
Сообщений: 207
Статус: Offline
| Прочтите, пожалуйста правила форума и исправьтесь.
http://diamfc.ucoz.ru/forum/2-1-1
Кстати, для вашей программы diamFC и так бесплатно сделает блок-схему, так что попробуйте сами.
|
| |
| |
| diamFC | Дата: Воскресенье, 18.12.2011, 19:13 | Сообщение # 3 |
|
Полковник
Группа: Администраторы
Сообщений: 207
Статус: Offline
| 
|
| |
| |
Программа для построения БЛОК-СХЕМ!!!
