что тут делать Для разработки новой акции потребовалось посчитать, сколько категорий товаров представлено в интернет-магазине компании «Долголетие».

Программа должна запрашивать ввод категорий, пока не будет введено «end». После считывания каждой категории счётчик категорий должен увеличиваться на 1. После введения стоп-слова «end» программа должна вывести количество категорий с текстом «Всего категорий товаров:» и завершить работу.

category = input('Категория (end - завершить):')
total_category = "end"
while category != "end":
total_category += category
category = input('Категория (end - завершить):')
print('Всего категорий товаров:', total_category)
я написал такую команду пишу end а там подсчитывает не сколько заявлений а сколько я написал букв или цифр типо аываыаы

код скопируй и добавь пробелы.

Объяснение:

category = input('Категория (end - завершить):')

total_category="end"

lines=0

while category!="end":

  total_category=total_category+" "+category

  category = input('Категория (end - завершить):')

  lines+=1

print('Всего категорий товаров:',str(lines))

program p;

var s,a,b,c: string; begins: =' фигуры'; writeln('введите названия трёх фигур'); read(a,b,c); writeln(s,': ',a,', ',b,' и ',c); end. 

ну вот так это будет выглядеть с ветвлением и возможностью повторять вычисления без повторного запуска программы.

var a,b,c,d,z: integer; beginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); writeln ('хотите ли вы решить еще один пример? 1-да, 0-нет'); read (z); while (z = 1) dobeginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3 число'); read (c); d: =a+b+c; writeln('сумма чисел ',a,'+',b,'+',c,'=',d); writeln ('хотите ли вы решить еще один пример? 1-да, 0-нет'); read (z); end; end.