Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Некоторые команды Рисователя
использовать Рисователь
новый лист(ширина,высота,цвет_фона)
линия(x1, y1, x2, y2)
в точку(x, y)
линия в точку(x, y)
прямоугольник(x1, y1, x2, y2)
окружность(x, y, r)
эллипс(x1, y1, x2, x2)
пиксель(x, y, цвет)
RGB(r, g, b)
RGBA(r, g, b, a)
перо(толщина, цвет)
кисть(цвет)
убрать кисть
залить(x, y)
надпись(x, y, текст)
шрифт(название, размер, ж, к)
Объяснение:
v=331+0,6*(-35)=310 м/c
v=331+0,6*30=349 м/c
uses crt; var n,i: integer; a: array[1..1000] of integer; beginread(n); for i: =1 to n do read(a[i]); for i: =1 to n do beginif a[i]< 0 then a[i]: =abs(a[i]); for i: =1 to n do write(a[i],' '); end.
Популярные вопросы