В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
kochergaki2000
kochergaki2000
06.02.2022 00:13 •  Информатика

Вvar g,h: integer; x,y: real; x0,y0,xm,ym,mx,my: integer; begin g: =detect; initgraph(g,h,''); begin line(0,round(getmaxy/2),getmaxx,round (getmaxy/2)); line (round (getmaxx/2),0,round(getmaxx/2),getmaxy); end; for xm: =20 to 620 do begin x: =(xm-x0)/mx; y: =x*x; ym: =round(y0-y*my); putpixel(xm,ym,15); end; readln; end. подскажите , что означает строка for xm: =20 to 620 do? что и зачем она нужна?

Ответ:
Kirill316111
Kirill316111
01.10.2020 00:26

Это цикл. код после do и до end; выполняется 620 - 20 = 600 раз, так как счёт идёт от 20 и заканчивается 620. Но тут ошибка. После begin и до end; нет увеличения счётчика xm(то есть эта переменная будет всегда равна 20), нужно добавить строху xm:=xm+1 ДО end;

 

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?