Вопрос №1 ? Какая вкладка в окне Инспектор объектов отражает видимую сторону компонента (размеры, формы, цвет, шрифт и т.д.)? Список форм Список свойств Свойства Список объектов TreeView Список событий Вопрос №2 ? Среда программирования Lazarusсостоит с: Компилятора Все ответы правильные Средств отладки программ Текстового редактора Вопрос №3 ? В программной среде Lazarus объект, на котором можно разместить различные компоненты называют Меню Списком Формой Инспектором Вопрос №4 ? Установите соответствие между составляющими языка программирования (1-4) и их определением (А-Д) Алфавит Словарь Синтаксис Семантика Правила составления и записи речевых конструкций: не словарных слов и предложений Набор слов, которые используются в этом языке Неправильное написание словарных слов, нарушение синтаксических правил Множество символов, из которых можно создавать слова и предложения этого языка Установленое однозначное толкование языковых конструкций, правил их выполнения А Б В Г Д 1 2 3 4 Вопрос №5 ? Установите соответствие между свойствами формы (1-4) и их назначением (А-Д) Name Caption Color Height Ее значение определяет текст в строке заголовка формы Ее значение определяет ширину окна в пикселях Ее значение определяет высоту окна в пикселях Ее значение определяет цвет фона формы Ее значение определяет имя формы как объекта А Б В Г Д 1 2 3 4

132

332

Посмотреть ответы 1

Ответы на вопрос:

Astento

Информатика

4,8(1 оценок)

1вариант var a,b,c,max,min, sum: real; {описание переменных, они все действительного типа} begin readln(a,b,c); {ввод с клав. чисел a,b,c} if (3*a)< (a+b) and (3*a)< (7*c) then {если первое выражение меньше второго и третьего, то} min: =3*a {переменной min присвоить значение первого выражения} else if (a+b)< (7*c) then {иначе, если 2-ое выражение < 3-го,то} min: =a+b {переменной min присвоить значение второго выражения} else min: =7*c; {иначе значение третьего выражения} if a> c then max: =a+b {если a> c (сравниваем только эти числа, так как число b входит в оба выражения), то переменной max присвоить значение первого выражения} else max: =b+c; {иначе второго} sum: =min+max; {находим сумму min и max} writeln(sum: 1: 2); {выписываем на экране ответ} readln; end. 2 вариант (все тоже самое, просто нахождение минимума и максимума производится в процедуре) процедура описывается всегда до основной программы, в ней используются абстрактные переменные, в данном случае x,y,z,u (локальные переменные), вместо которых при вызове процедуры в основной программе будут даваться конкретные значения введенных ранее переменных. var a,b,c,max, min, sum: real; procedure mn(x,y,z: real; var u: real); begin if (x< y) and (x< z) then u: =x else if (y< z) then u: =y else u: =z; end; procedure mx(x,y: real; var u: real); begin if (x> y) then u: =x else u: =y; end; begin readln(a,b,c); mn(3*a,a+b,7*c,min); mx(a+b,b+c,max); sum: =min+max; writeln(sum: 1: 2); readln; end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.