Какое значение будет иметь переменная z после выполнения операторов: z: 5; if x> 0 then if y< 0 then z: = z+1 else z: = z-2; при а) x=1; y=1; b) x=1; y=-1; c)x=-1; y=1; с решением ,заранее
Невнятно как-то сформулировано - то индексы найти, то массива нету... Пишу, как понял.
ОТДЕЛ Задание+; ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПЕР массив: РЯД 15 ИЗ ВЕЩ; сч, найдено: ЦЕЛ; найденное, индексы: ДОСТУП К РЯД ИЗ ВЕЩ;
УКАЗ найдено := 0; СОЗДАТЬ(индексы, РАЗМЕР(массив) - 1); ОТ сч := 1 ДО РАЗМЕР(массив) - 1 ВЫП ЕСЛИ массив[сч] = массив[0] ТО найденное[найдено] := сч; УВЕЛИЧИТЬ(найдено) КОН КОН; ЕСЛИ найдено = 0 ТО Вывод.Цепь("Не найдено.") ИНАЧЕ СОЗДАТЬ(индексы, найдено); ОТ сч := 0 ДО найдено - 1 ВЫП индексы[сч] := найденное[сч] КОН; найденное := ПУСТО КОН
1 - ЭЛТ, ЖК, PDP, Плазменный, LED, OLED, Лазерный, Виртуальный ретинальный монитор(ы) - (есть и другие, но наверно учитель твой не шарит в этом...)
2 - NumLock
3 -
4 - Шариковый манипулятор мыши
5 - 4-е поколение1977 – 1991 гг. (большие и сверхбольшие интегральные схемы- микропроцессоры (десятки тысяч- миллионы транзисторов в одном кристалле)) Основные черты этого поколения ЭВМ — наличие запоминающих устройств, запуск ЭВМ с системы самозагрузки из ПЗУ, разнообразие архитектур, мощные ОС, объединение ЭВМ в сети.
7 - Цифровая печатная машина (ЦПМ) или полно-цветной МФУ (многофункциональное устройство) , или просто полно-цветной принтер определенного размера.
8 - Microsoft Power Point (Для докладов в виде презентации), Microsoft Office (Для докладов в видео листа бумаги)
9 - Для ввода: Микрофон, Цифровой диктофон, Модем Для вывода: Встроенный динамик, Колонки, Наушники.
10 - Куллер внутренний(для охлаждения видеокарты), Материнская плата, Процессор,(Голый ЦП :)), Оперативка, Жёсткий диск, куллер на процесор, видеокарта, блок питания.
11 - Системный блок, Монитор, Клавиатура (Некоторые персональные компьютеры имею встроенный сенсорный экран, по этому мышка не требуется), Мышка.
12 - Строка заголовка, Строка меню, Панель инструментов, Рабочая область, Палитра, Полосы прокрутки, Строка состояния и что-еще, прости если чего-то не будет хватать, не помню уже точно...
13 - Я конечно сдаю информатику, но это крайний стояк... 1.1 Неправильное положение тела 1.2 Общее недомогание: сонливость, утомляемость, не проходящая усталость (даже после отдыха); головные боли после работы; глазные боли; напряженность мышц верхней части туловища) 1.3 Нарушения визуального восприятия 1.4 Ухудшение сосредоточенности и работо
14 - SHIFT
15 - Линейное, Нелинейное, Гипермедиа, Живое видео (Мне рассказали только 4 вида мультимедии, моя оплошность, сорян бро :) )
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\";
ПЕР
массив: РЯД 15 ИЗ ВЕЩ;
сч, найдено: ЦЕЛ;
найденное, индексы: ДОСТУП К РЯД ИЗ ВЕЩ;
УКАЗ
найдено := 0;
СОЗДАТЬ(индексы, РАЗМЕР(массив) - 1);
ОТ сч := 1 ДО РАЗМЕР(массив) - 1 ВЫП
ЕСЛИ массив[сч] = массив[0] ТО
найденное[найдено] := сч;
УВЕЛИЧИТЬ(найдено)
КОН
КОН;
ЕСЛИ найдено = 0 ТО Вывод.Цепь("Не найдено.")
ИНАЧЕ
СОЗДАТЬ(индексы, найдено);
ОТ сч := 0 ДО найдено - 1 ВЫП
индексы[сч] := найденное[сч]
КОН;
найденное := ПУСТО
КОН
КОН Задание.