Задача А
program Boom;
uses crt;
var
a, b: integer;
begin
Read(a, b);
if a > b then Writeln('Наибольшее число ', a) else Writeln('Наибольшее число ', b);
end.
Тестовое решение
12
52
Наибольшее число 52
Задача Б
program Boom;
uses crt;
var
a:array[1..4] of Integer;
max:integer;
i:byte;
Begin
for i:= 1 to 4 do
Begin
Write('Введите число:');
Read(a[i]);
End;
max := a[1];
for i:= 2 to 4 do
if a[i] > max then
max := a[i];
Write('Наибольшее число:');
WriteLn(max);
End.
Тестовое решение:
Введите число:12
Введите число:53
Введите число:34
Введите число:63
Наибольшее число:63
Задача А
program Boom;
uses crt;
var
a, b: integer;
begin
Read(a, b);
if a > b then Writeln('Наибольшее число ', a) else Writeln('Наибольшее число ', b);
end.
Тестовое решение
12
52
Наибольшее число 52
Задача Б
program Boom;
uses crt;
var
a:array[1..4] of Integer;
max:integer;
i:byte;
Begin
for i:= 1 to 4 do
Begin
Write('Введите число:');
Read(a[i]);
End;
max := a[1];
for i:= 2 to 4 do
if a[i] > max then
max := a[i];
Write('Наибольшее число:');
WriteLn(max);
End.
Тестовое решение:
Введите число:12
Введите число:53
Введите число:34
Введите число:63
Наибольшее число:63
ответ:
ну обычно, это:
1. заголовок окна - где пишется название программы или название создаваемого документа плюс кнопки "закрыть", "свернуть", "развернуть"
2. строка меню - строка, через которую программой
3. панель инструментов - панель быстрого доступа к элементам программой.
4. рабочая область, в которой работает пользователь.
5. строка состояния - отображает текущий процесс или состояние.ну обычно, это:
1. заголовок окна - где пишется название программы или название создаваемого документа плюс кнопки "закрыть", "свернуть", "развернуть"
2. строка меню - строка, через которую программой
3. панель инструментов - панель быстрого доступа к элементам программой
4. рабочая область, в которой работает пользователь .
5. строка состояния - отображает текущий процесс или состояние.
объяснение: