Var h1,h2:integer; n1,n2:string; begin Write('Введите имя первой девочки: '); Readln(n1); Write('Введите рост первой девочки: '); Readln(h1); Write('Введите имя второй девочки: '); Readln(n2); Write('Введите рост второй девочки: '); Readln(h2); if h1>h2 then Writeln(n1,' выше, чем ',n2) else if h2>h1 then Writeln(n2,' выше, чем ',n1) else Writeln(n1,' и ',n2,' одного роста') end.
Тестовое решение: Введите имя первой девочки: Наташа Введите рост первой девочки: 163 Введите имя второй девочки: Даша Введите рост второй девочки: 167 Даша выше, чем Наташа
Блок-схема дана во вложении. Блоки ввода вывода упрощены в связи с невозможностью (и ненужностью) точно отобразить вид ввода и вывода.
1. Вкладки --- H. переключение между ними осуществляется щелчком мыши по их названию, на них размещаются элементы управления
2. Текстовые поля --- E. служит для ввода последовательности символов
3. Списки --- F. представляет собой набор значений и выглядит как текстовое поле, снабженное кнопкой с направленной вниз стрелкой
4. Переключатели --- C. служат для выбора одного из взаимоисключающих вариантов
5. Флажки --- G. обеспечивают присваивание какому-либо параметру определенного значения и могут располагаться как группами, так и поодиночке
6. Счетчики --- A. представляет собой пару стрелок, которые позволяют увеличивать или значение в связном с ним поле
7. Ползунки --- D. позволяет плавно изменять значение какого-либо параметра
8. Командные кнопки --- B. щелчок по ним обеспечивает выполнение того или иного действия, а надпись на них поясняет назначение