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 Даша выше, чем Наташа
Блок-схема дана во вложении. Блоки ввода вывода упрощены в связи с невозможностью (и ненужностью) точно отобразить вид ввода и вывода.
mirdetzhuk79
17.06.2022
1 Программное обеспечение – это все или часть программ, процедур, правил и соответствующей документации системы обработки информации.
2 Найдите лишнее. ОС Windows XP - это операционная система, а не прикладное программное обеспечение. 1С: Предприятие - это программа НЕ фирмы Microsoft;
3 В следующих утверждениях найдите и исправьте ошибки. Прикладные программы – это средства, предназначенные для обработки информации..
4 Системное программное обеспечение: a )программы для организации совместной работы устройств компьютера как единой системы
5) Система управления базами данных представляет собой программный продукт, входящий в состав: с) прикладного программного обеспечения
6. Операционные системы представляют собой программные продукты, входящие в состав: а) системного программного обеспечения;
7. Программы обслуживания устройств компьютера называются: б) драйверами;
8.В прикладное программное обеспечение входят: д) текстовые редакторы.
9.Назначение программного обеспечения с) организует процесс обработки информации в соответствии с программой
10. Система программирования позволяет д) организовать общение человека и компьютера на формальном языке
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Каким образом делается перевод вещественных чисел из десятичной в двоичною и наооборот
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
Даша выше, чем Наташа
Блок-схема дана во вложении. Блоки ввода вывода упрощены в связи с невозможностью (и ненужностью) точно отобразить вид ввода и вывода.