В последовательности симаолов, вводимых с клавиатуры , подсчитать количество пар символов "*". Признак заверше - Turbo Pascal
Формулировка задачи:
В последовательности симаолов, вводимых с клавиатуры , подсчитать количество пар символов "*". Признак завершения ввода: два символа "+".
Решение задачи: «В последовательности симаолов, вводимых с клавиатуры , подсчитать количество пар символов "*". Признак заверше»
textual
Листинг программы
program mg4000;
var x,y:char; k:integer;
begin
repeat
readln(x);
y:=x;
if (x='*') then inc(k);
until (x='+') and (y='+');
readln;
writeln('k='k div 2);
end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д