Print("В магазине одежды финальная распродажа!") print("Скидка 70% от цены на ярлыке!")
price = int(input("Чтобы узнать стоимость вещи, введите цену с ярлыка:"))
= Допиши строку с расчётом
price = 100
print("Стоимость вещи со скидкой:")
print(price)
​

Граф, графи́ня (нем. Graf) — королевское должностное лицо в Раннем Средневековье в Западной Европе. Титул возник в IV веке в Римской империи и первоначально присваивался высшим сановникам(например, comes sacrarum largitionum «главный казначей»). Во Франкском государстве со второй половины VI века граф (гауграф) в своём округе-графстве/гау(нем. Gau — первоначально, сельская община у древних германцев, численностью ок. 100 человек) обладал судебной, административной и военной властью. По постановлению Карла II Лысого (877) должность и владения графа стали наследственными.

В период феодальной раздробленности — феодальныйвладетель графства, затем (с ликвидацией феодальной раздробленности) титул высшего дворянства. В качестве титула формально продолжает сохраняться в большинстве стран Европы с монархической формой правления.

В России титул введён Петром I(первым его получил в 1706 году Б. П. Шереметев). В конце XIX векаучтено свыше 300 графских родов. Графский титул в советской России был ликвидирован Декретом ВЦИК и Совнаркома от 11 ноября 1917 года.

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:= ArrRandom(10, -100, 100);a.Println;
Writeln('Количество отрицательных элемнтов -> ', a.Where(t -> t < 0).Count);
Writeln('Сумма отрицательных элеменов ->', a.Where(t -> t < 0).Sum);
Writeln('Среднее значение положительных элементов ->', a.Where(t -> t > 0).Average);
if a.Where(t -> t > 0).Count > 0 then
  Writeln('Максимальное положительное значение -> ', a.Where(t -> t > 0).Max)
else Writeln('Положительных чисел нет');

end.