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

Задание:

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

Решение:

Var i,col: integer; s: string; beginreadln (s); col: =0; for i: =1 to length (s) dobeginif (s[i]='+') or (s[i]='-') thencol: =col+1; end; writeln ('Количество плюсов и минусов: ',col); end.

Знаете другой ответ?

Отправить свой ответ