Компьютерный форум
Правила
Вернуться   Компьютерный форум > Форум программистов > Языки программирования > Pascal
Перезагрузить страницу Коментарии к программе.
Ответ
 
Опции темы Опции просмотра
  (#1 (permalink)) Старый
bibiken bibiken вне форума
Новичок
 
Сообщений: 4
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Регистрация: 10.10.2015
Exclamation Коментарии к программе. - 12.10.2015, 10:34

Я не так давно обращался к вам за помощью и делю это снова. Помогите написать коментарии к программе. То есть какую функцию выполняет каждая строчка. Вот сама программа.
var s,sa,sb:string;
z:char;
a,b,pr,k:integer;
begin
write('Введите пример >> ');
readln(s);
pr:=pos(' ',s);
while pr <> 0 do
begin
delete(s,pr,1);
pr:=pos(' ',s);
end;
if pos('+',s) <> 0 then z:='+'
else if pos('-',s) <> 0 then z:='-'
else if pos('*',s) <> 0 then z:='*'
else if pos('/',s) <> 0 then z:='/';
sa:=copy(s,1,pos(z,s)-1);
sb:=copy(s,pos(z,s)+1,length(s));
val(sa,a,k);
val(sb,b,k);
case z of
'+' : writeln(a,' + ',b,' = ',a+b);
'-' : writeln(a,' - ',b,' = ',a-b);
'*' : writeln(a,' * ',b,' = ',a*b);
'/' : writeln(a,' / ',b,' = ',a/b);
else writeln('Не верная операция');
end;
end.
Ответить с цитированием
Ads
Ответ

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вопрос по программе Woron Любые вопросы от новичков 9 23.07.2014 13:00
Ищу альтернативу программе murabel Графика & дизайн 1 03.08.2013 02:02
О программе «Help & Manuel» Кирф Общие вопросы создания ПО 2 24.04.2013 20:04
Проверьте правильность написания кода и коментарии mugik Visual C++ 0 01.09.2012 19:30
сделать коментарии и проверьте код к задаче ргр по теории информатики mugik Visual C++ 0 01.09.2012 19:21
меню в программе Leks100 С/С++ 0 04.04.2012 17:50
Ошибка в программе Rezvanov С/С++ 0 01.11.2011 18:29
Вопрос программе CPU-Z les.2007 Любые вопросы от новичков 3 04.09.2011 06:38
Как добавить коментарии для своей программы AndrealinA C++ Builder 3 17.05.2009 15:27
Assembler просто нужны коментарии к программе Gabriel Assembler 0 22.05.2008 17:38
Ошибка в программе AgeXP С/С++ 4 16.11.2006 00:37
Семерки в программе Anonymous Вопросы начинающих программистов 1 13.01.2004 16:14



Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.
Нardforum.ru - компьютерный форум и программирование, форум программистов