Program n; var a, b, i: integer; begin b:= 0; for i:=1 to 4 do begin readln(a); if a > b then b:=a; end; writeln('Наибольшее: ' + b); end.
Как это работает? Объявляются три целочисленные (interger) переменные: a - вводимое число b - самое большое число i - счётчик цикла После запуска программы переменной b присваивается значение 0 (чтобы было с чем сравнивать при первом значении) Запускается цикл for с счётчиком i Каждый раз цикл просит ввести пользователя число (а) Дальше проверяется условие, если введённое число a больше числа, которое записано как самое большое (if a>b) Если ведённое число больше, чем самое большое, то переменной b присваивается значение a И так пока цикл не закончится Затем выводится переменная b, в которой хранится самое большое из введённых чисел.
Главный мой вопрос был бы интернету-человеку - как ты вмещаешь столько информации? Откуда ты все это знаешь и как запоминаешь? Считаешь ли ты себя самым умным и всезнающим человеком? Ставишь ли себя выше всех остальных? Считаешь ли себя незаменимым человеком? А предъявить в обвинения могу тебе (интернет-человек) твою доступность, твои знакомства и связи (начиная с самого маленького возраста). Почему охотно занимаешься разносом самой непроверенной информации и не несёшь за это никакой ответственности.
Даже не знаю ли это Вам. Как то так, на мой лад получилось)
var
a, b, i: integer;
begin
b:= 0;
for i:=1 to 4 do
begin
readln(a);
if a > b then
b:=a;
end;
writeln('Наибольшее: ' + b);
end.
Как это работает?
Объявляются три целочисленные (interger) переменные:
a - вводимое число
b - самое большое число
i - счётчик цикла
После запуска программы переменной b присваивается значение 0 (чтобы было с чем сравнивать при первом значении)
Запускается цикл for с счётчиком i
Каждый раз цикл просит ввести пользователя число (а)
Дальше проверяется условие, если введённое число a больше числа, которое записано как самое большое (if a>b)
Если ведённое число больше, чем самое большое, то переменной b присваивается значение a
И так пока цикл не закончится
Затем выводится переменная b, в которой хранится самое большое из введённых чисел.