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

Меттердің жалық-
аттық модель:
ньдық модель.
h) комII
с) ақпарат
d) вербальд
те модельдің қандай
ің қандай түрі
1) 5.3-суретте
дейнеленген?
а) ойын,
b) оқу;
Пиялық;
ги-техникалық
) имитациялы
нелерді салу кезеңдерінін О.3-сурет. б
d) ғылыми-те
Үшөлшемді бейн
5.3-сурет. Объект моделі
елерін атаңдар:
tін объектінің кеңістік-уак
ережелері
іс-уакыттық сипаттамасы,
тандыру, түсірілім, рендеринг:
және рендерингке сәйкес объект на
а) зерттелетін о
b) модельдеу.
с) бояуға, жа
өлеу, бояу, жарықтанла
а, жарықтандыруға жән
еттерін бөліп алу:
ретін объектінің түсірілімі ме
і лімі мен бояу қасиеттерінің сипат-
d) зерттелетін
тамасы.
тау және бағалау деңгейі
елия мен Интернет ресурстарын,
тау, жинақтау ж,
урстарын пайдалана отырып,
1. Энциклопедия мен
сын жүргізіңдер. «3D әлемі туралы кызыкт
оппен зерттеу жұмысын жур
деректер» тақырыбы
ырыбы бойынша эссе жазыңдар.
аратты талдау, жинақтау және бағалау
а Жаңа ақпаратты талдау.
mT Tm​

Показать ответ
Ответ:
Sgff3
Sgff3
12.08.2020 22:00

program a2;

var

 a, x1, y1, z1, l1, z, l: string;

 i, g, d, f, a1, b1, sum, vr, vr1, err: int64;

begin

 readln(a);

 g := pos(';', a);

 x1 := copy(a, 2, g - 2);

 y1 := copy(a, g + 2, length(a) - g - 2);

 if a[1] = '[' then d := 1

 else d := 0;

 if a[length(a)] = ']' then f := 1

 else f := 0;

 if pos('/', x1) <> 0 then begin

   z := copy(x1, 1, pos('/', x1) - 1);

   z1 := copy(x1, pos('/', x1) + 1, length(x1) - pos('/', x1));

   val(z, vr, err);

   val(z1, vr1, err);

   a1 := vr div vr1;

 end

 else val(x1, a1, err);

 if pos('/', y1) <> 0 then begin

   l := copy(y1, 1, pos('/', y1) - 1);

   l1 := copy(y1, pos('/', y1) + 1, length(y1) - pos('/', y1));

   val(l, vr, err);

   val(l1, vr1, err);

   b1 := vr div vr1;

 end

 else val(y1, b1, err);

 for i := a1 to b1 do sum := sum + 1;

 val(z, vr, err);

 val(z1, vr1, err);

 if (d = 0) then  

   if vr = 0 then sum := sum - 1

   else if (vr mod vr1 = 0) then sum := sum - 1;

 val(l, vr, err);

 val(l1, vr1, err);

 if (f = 0) then  

   if vr = 0 then sum := sum - 1

   else if (vr mod vr1 = 0) then sum := sum - 1;

 writeln(sum);

end.

На не благодари)

0,0(0 оценок)
Ответ:
boginyanatasha
boginyanatasha
15.04.2022 14:32

Событие: решение задачи. Источник информации: учитель. Приемник информации: ученик. Информационный носитель: доска. Событие: измерения давления. Источник ифнормации: пациент. Приемник информации: врач. Информационный носитель: тонометр. Событие: воспроизведение аудиофайла. Источник информации: пользователь. Приемник информации: сайт. Информациональнный носитель: ПК/телефон.

Событие: воспроизведение: видео и аудиофайла. Источник информации: пользователь. Приемник информации: телевизор. Информациональный

носитель: телевизор. Событие: воспроизведение

музыкального фрагмента в живую. Источник информации: ученик. Приемник информации: ближайшие слушатели. Информациональнный

Носитель: гитара.

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