If a>1000 then
b:=a*0.15;
a:=a -b;
write(a);
else
write('скидки нет');
End.
<span>Нажмите кнопку Кнопка Microsoft Office и выберите пункт Параметры Word. </span>
<span>Щелкните категорию Настройка. </span>
<span>В диалоговом окне Параметры Word в списке Выбрать команды из выберите Все команды. </span>
<span>В списке команд выбранной категории выберите Автоформат и нажмите кнопку Добавить.</span>
<span>Примечание. Можно также добавить команду Выполнить автоформат.</span>
Вот с;
ничего не надо. обожаю эти таблицы делать ахаха. извини, если ошибка где
X1=600
x2=600
i=8 бит
x1*x2*i = 2880000 бит ~ 351,6 КБ.
Setpencolor(clцвет)
Setpenwidth(размер)