Решить задачу: пользователь вводит 4 числа, найти максимальное и минимальное из этих чиселСРОЧНО, 24 БАЛЛА!!!
Решить задачу: пользователь вводит 4 числа, найти максимальное и минимальное из этих чисел
СРОЧНО, 24 БАЛЛА!!!
Гость
Ответ(ы) на вопрос:
Гостьprogram test;
var
n,i,min,max:integer;
a:array[1..4] of integer;
begin
for i:=1 to 4 do begin
readln(a[i]);
if i=1 then begin
min:=a[i];max:=a[i];
end
else
begin
if a[i]>max then max:=a[i]
else if a[i]
Не нашли ответ?
Похожие вопросы