Составить таблицу истинности для логической схемы,

amount = 0

while True:

   cost = int(input("Стоимость товара (0 - покупок больше нет): "))

   if cost == 0:

       break

   amount += cost

print("Стоимость всех покупок:", amount)

Объяснение:

amount = 0 // Сумма = 0

while True: // Пока истинно

   cost = int(input("Стоимость товара (0 - покупок больше нет): ")) // Вводим стоимость с клавиатуры

   if cost == 0: // Если стоимость = 0

       break // Выходим из цикла

   amount += cost // Добавляем к сумме стоимость

print("Стоимость всех покупок:", amount) // Выводим ответ

Program SandP; //Название программы var //Описание переменных x,y: real; // Стороны прямоугольника S: real; // Площадь прямоугольника P: real; // Периметр прямоугольника procedure RectSP(a,b: real; var S,P:real); //Процедура begin S := a * b; //Нахождение площади P := a + b; //Нахождение суммы end; begin //Начало основной части программы writeln('Введите стороны прямоугольника: '); //Диалог с пользователем readln(x,y); //Считывание сторон RectSP(x,y,S,P); //Вызов процедуры writeln('Площадь равна ',S); //Вывод площади writeln('Периметр равен ',P); //Вывод периметра end. //Конец программы