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

Векторлық гракиканың және растрлық графиканың айырмашылығы мен Ұқсастығы​

Показать ответ
Ответ:
Bredovik
Bredovik
01.08.2021 03:08

2015 - целый                                               ( Потомушто Нету точек)

2.555 - с плавающей точкой                    (потомушто тут есть точка)

True - логический                                       (Потомушто тру фалс логический)

2 147 489 647.0 - с плавающей точкой   (потомушто тут есть точка)

"s" - символьный                                         (потомушто букви символьный)

2 147 489 647 - целый                                ( Потомушто Нету точек)

Kiario - символьный                                    (потомушто букви символьный)    

False - логический                                       (Потомушто тру фалс логический)

: поставить 5 звезд и короно4ку

0,0(0 оценок)
Ответ:
Sheik077
Sheik077
06.01.2020 00:05

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

25

26

27

uses graphABC;

var n,da,db,x1,y1,x2,y2:integer;

begin

repeat

write('Введите количество точек от 2 до 50 n=');

readln(n);

until n in [2..50];

clearwindow;

da:=(windowwidth-100)div (n-1);//расстояние между точками ввверху

db:=da div 4;//то же внизу

if odd(n) then//если n нечетное

begin

 x1:=windowwidth div 2-da*(n div 2);

 x2:=windowwidth div 2-db*(n div 2);

end

else //если четное

begin

 x1:=windowwidth div 2-da*(n div 2-1)- da div 2;

 x2:=windowwidth div 2-db*(n div 2-1)- db div 2;

end ;

y1:=50;

y2:=windowheight-50;

for var i:=0 to n-1 do

line(x1+i*da,y1,x2+i*db,y2);

line(x1,y1,x1+(n-1)*da,y1);

line(x2,y2,x2+(n-1)*db,y2);

end.

Объяснение:

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