очень надо Список во теста Во При какой информационной модели удобно представить план структуры сайта? Выберите один из 4 вариантов ответа: Варианты ответов Диаграмма Таблица Граф Рисунок Во Сколько ссылок необходимо изменить при добавлении веб-страницы в середину сайта, имеющего линейную структуру. Запишите число: Во Укажите порядок действий при создании сайта Укажите порядок следования всех 5 вариантов ответа: Варианты ответов Выбор темы Изучение темы Подбор информации Продумывание структуры сайта Создание сайта при различных технологий и инструментов Во Что из перечисленного является языками программирования? Выберите несколько из 4 вариантов ответа: Варианты ответов HTML JavaScript CSS php Во Какая структура сайта наиболее универсальна? Выберите один из 4 вариантов ответа: Варианты ответов Решетчатая Линейная с ответвлениями Древовидная Линейная Во Что такое HTML? Выберите один из 4 вариантов ответа: Варианты ответов Протокол передачи гипертекста Язык разметки гипертекста Язык программирования Текстовый редактор Во Как называется система переходов с одной страницы сайта на другую? Выберите один из 4 вариантов ответа: Варианты ответов Навигация по сайту Ориентирование на сайте Граф сайта Дерево сайта Во При чего осуществляется разметка гипертекста в языке разметки HTML? Выберите несколько из 4 вариантов ответа: Варианты ответов Стандартные инструменты текстового редактора Знаки препинания Теги Атрибуты Во Где применяется решетчатая структура сайта. Выберите один из 4 вариантов ответа: Варианты ответов Рекламные сайты Обучающие порталы Сайты-презентации Сайты-каталоги Во Укажите соответствие между технологиями создания сайтов и их назначением.
Ответы
1)var a:array [1..10] of integer; i,sum:integer;begin randomize; sum:=0; for i:=1 to 10 do begin a[i]:=random(100)-50; write (a[i],' '); if a[i] < 0 then sum:=sum+a[i]; end; writeln; writeln ('Summa: ',sum); readln;end.
2)var a:array [1..10] of integer; i,max,index:integer;begin for i:=1 to 10 do begin write ('A[',i,'] = '); readln (a[i]); end; max:=a[1]; index:=1; for i:=2 to 10 do if a[i] > max then begin max:=a[i]; index:=i; end; writeln ('Max: ',max,'.Index: ',index); readln;end.
3)var a:array [1..10] of integer; max,min,i,temp:integer;begin randomize; for i:=1 to 10 do begin a[i]:=random(50); write (a[i],' '); end; writeln; max:=1; min:=1; for i:=2 to 10 do if a[i] > a[max] then max:=i else if a[i] < min then min:=i; writeln ('Max: ',a[max]); writeln ('Min: ',a[min]); temp:=a[min]; a[min]:=a[max]; a[max]:=temp; for i:=1 to 10 do write (a[i],' ');end.Не знаю- правильно ли?
2)var a:array [1..10] of integer; i,max,index:integer;begin for i:=1 to 10 do begin write ('A[',i,'] = '); readln (a[i]); end; max:=a[1]; index:=1; for i:=2 to 10 do if a[i] > max then begin max:=a[i]; index:=i; end; writeln ('Max: ',max,'.Index: ',index); readln;end.
3)var a:array [1..10] of integer; max,min,i,temp:integer;begin randomize; for i:=1 to 10 do begin a[i]:=random(50); write (a[i],' '); end; writeln; max:=1; min:=1; for i:=2 to 10 do if a[i] > a[max] then max:=i else if a[i] < min then min:=i; writeln ('Max: ',a[max]); writeln ('Min: ',a[min]); temp:=a[min]; a[min]:=a[max]; a[max]:=temp; for i:=1 to 10 do write (a[i],' ');end.Не знаю- правильно ли?
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
MessageBox
public static DialogResult Show( string text ) - только сам текст сообщения
Например
MessageBox.Show("Hello, world.");
Есть много перегрузок у метода Show
Show(String, String) - текст и заголовок
Show(String, String, MessageBoxButtons) - текст и заголовок и кнопки
Show(String, String, MessageBoxButtons, MessageBoxIcon) - плюс иконка окна сообщения
Show(String, String, MessageBoxButtons, MessageBoxIcon, MessageBoxDefaultButton) - плюс выбрана кнопка по умолчанию
И еще и еще. Смотрите справку на сайте MSDN
Пример с иконкой
MessageBox.Show("Typical installation is strongly recommended.", "Install information", MessageBoxButtons.OK, MessageBoxIcon.Information);