Составьте программу, которая считает в формуле, заданной с клавиатуры, количество плюсов и минусов. на паскале.

P. S формулы в программе быть не должно

Question

Информатика

Ильюха

1 июля, 20:20

Составьте программу, которая считает в формуле, заданной с клавиатуры, количество плюсов и минусов. на паскале.

P. S формулы в программе быть не должно

+2

Ответы (1)

Знаете ответ на вопрос?

Ануся · Answer 1

var a:string;

i:integer;

c:boolean;

begin

readln (a) ;

repeat

if pos ('+', a) 0 then begin inc (i) ; delete (a, pos ('+', a),1) ; end;

if pos ('-', a) 0 then begin inc (i) ; delete (a, pos ('-', a),1) ; end;

if (pos ('+', a) = 0) and (pos ('-', a) = 0) then c:=true;

until c;

writeln (i) ;

end.

Составьте программу, которая считает в формуле, заданной с клавиатуры, количество плюсов и минусов. на паскале.P. S формулы в программе быть не должно

Составьте программу, которая считает в формуле, заданной с клавиатуры, количество плюсов и минусов. на паскале.

P. S формулы в программе быть не должно