Наименование Макс. кол-во (шт) Цена, ед
Пирожки 2000 2
Шанежки 1500 4
Булочки 1200 1
Пирожное 700 8
Изделия
Наименование Количество
Пирожки 0
Шанежки 400
Булочки 0
Пирожное 700
1100 1100 склад
Максимальная выручка цеха 7200
Var a:integer;
begin
readln(a);
writeln(a mod 3=0);
end.
Пример: 20
False
Объяснение:
В квадратных скобках указывается порядковый номер числа константы "b", т.е. число 11 стоит на 5 месте относительно других значений в массиве, как это указано в квадратных скобках.
Пока не конец экрана(поля) Делать:
Рисовать Вправо 10 точек, Шаг вправо 10 точек
Шаг вниз на 1 точку
Пока не начало экрана(поля) Делать:
Рисовать Влево 10 точек, Шаг влево 10 точек
Шаг вниз на 1 точку
Если не конец экрана(поля) Перейти в начало программы иначе выход