Sub aaa()
Cells(8, 3).Formula = "=MAX(A5:A9)+MIN(A5:A9)"
End Sub
И хорошо и плохо.
хорошо: помогает в подготовке различных работ
плохо: когда человек пользуется интернетом слишком много то начинается зависимость, но при этом мы её не замечаем.
Uses crt;
var a, b: Integer;
begin
readln(a, b);
clrscr;
writeln(a - b);
end.