Вопрос по информатике:
Составить блок-схему и программу, которая начертит оси координат, которые пересекаются в точке координат 200х200. B этой системе координат нарисовать косинусоиду.
P.S в программе вроде должна быть команда trunk(x)
Блок-схему тоже обязательно
- 17.01.2016 02:12
- Информатика
- remove_red_eye 5121
- thumb_up 30
Ответы и объяснения 1
begin
InitWindow(0,0,800,600,clWhite);
Coordinate.SetMathematic;
Coordinate.SetTransform(400,300,0,1,1);
var d:=3; var x:=0; var y:=0;
for var i:=0 to d-1 do
for var j:=-400 to 400 do begin
PutPixel(j, y+i, clBlue);
PutPixel(x+i, j, clBlue);
end;
d:=1; x:=200; y:=200;
for var i:=0 to d-1 do
for var j:=-400 to 400 do begin
PutPixel(j, y+i, clRed);
PutPixel(x+i, j, clRed);
end;
for var i:=0 to 400 do
PutPixel(i, trunc(sin(i/15*pi)*15)+200, ClBlack);
end.
- 18.01.2016 13:37
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.