Составить программу,которая считает в формуле,заданной с клавиатуры, колличество плюсов и минусов (программа в паскале)
Составить программу,которая считает в формуле,заданной с клавиатуры, колличество плюсов и минусов (программа в паскале)
Гость
Ответ(ы) на вопрос:
ГостьVar i,col:integer;
s:string;
begin
readln(s);
col:=0;
for i:=1 to length(s) do
begin
if (s[i]='+') or (s[i]='-') then
col:=col+1;
end;
writeln('Количество плюсов и минусов: ',col);
end.
Не нашли ответ?
Похожие вопросы